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INTRODUCTION 



In this reference manual which describes the version of the BASIC language used with MARK n, 
the extensions and additions to the versatile BASIC language are as follows: 



ASCII sequential, binary sequential, and binary random data files. 

e String processing, which permits manipulation of alphanumeric data. 

e Chaining, which permits a program to stop and begin execution of another program 
without direct intervention. 



e Liberal defining of variables in a function statement. 

o Powerful subf unction capability for formatting output. 

o Ability for initializing all variables, lists, and tables to zero. 



A first introduction to writing a BASIC program is given in Section 2; it includes all that you 
will need to know in order to write a wide variety of useful and interesting programs. Section 
3 deals with more advanced computer techniques. 



Appendix A provides a reference for Error Messages. 
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Section 1 . WHAT IS A PROGRAM 



A program is a set of directions that is used to tell a computer how to provide an answer to 
some problem. It usually starts with the given data, contains a set of instructions to be per- 
formed or carried out in a certain order, and ends up with a set of answers. 

Any program must meet two requirements before it can be carried out. The first is that it must 
be presented in a language that is understood by the computer. If the program is a set of in- 
structions for solving a system of linear equations and the computer is an English-speaking 
person, the program will be presented in some combination of mathematical notation and 
English. If the computer is a French-speaking person, the program must be in his language; 
and if the computer is a high-speed digital computer, the program must be presented in a 
language which the computer understands. 

The second requirement for all programs is that they must be completely and precisely stated. 
This requirement is crucial when dealing with a digital computer, which has no ability to infer 
what you mean--it does what you tell it to do, not what you meant to tell it. 

We are, of course, talking about programs which provide numerical answers to numerical 
problems. It is easy for a programmer to present a program in the English language, but such 
a program poses great difficulties for the computer because English is rich with ambiguities 
and redundancies, those qualities which make computing impossible. Instead, you present your 
program in a language which resembles ordinary mathematical notation, which has a simple 
vocabulary and grammar, and which permits a complete and precise specification of your 
program. The language you will use is BASIC (Beginner^s All-purpose Symbolic Instruction 
Code) which is, at the same time, precise, simple, and easy to understand. 
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Section 2. A BASIC PRIMER 



Example of a Complete BASIC Program 

The following example is a complete BASIC program for solving a system of two simultaneous 
linear equations in two variables 

ax + by = c 
dx + ey = f 

and then solving two different systems, each differing from this system only in the constants c 
and f. 

You should be able to solve this system, if ae - bd is not equal to 0, to find that 
ce - bf , af - cd 

If ae - bd = 0, there is either no solution or there are infinitely many, but there is no unique 
solution. If you are rusty on solving such systems, take our word for it that this is correct. 
For now, we want you to understand the BASIC program for solving this system. 



Study this example carefully; in most cases, the purpose of each line in the program is 
self-evident - and then read the commentary and explanation. 



A first observation is that each line of the program begins with a number. These numbers are 
called line numbers and serve to identify the lines, each of which is called a statement . Thus, 
a program is made up of statements, most of which are instructions to the computer. Line 
numbers also serve to specify the order in which the statements are to be performed by the 
computer. This means that you may type your program in any order. Before the program is 
run, the computer sorts out and edits the program, putting the statements into the order 
specified by their line numbers. (This editing process facilitates the correcting and changing 
of programs, as we shall explain later. ) 

A second observation is that each statement starts, after its line number, with an English 
word. This word denotes the type of the statement. There are several types of statements in 
BASIC, nine of which are discussed in this section. Seven of these nine appear in the sample 
program of this section. 

A third observation, not at all obvious from the program, is that spaces have no significance in 
BASIC, except in messages which are to be printed out, as in Line 65 in the preceding example. 
Thus, spaces may be used at will to make a program more readable. Statement 10 could have 
been typed as lOREADA, B,D, E, and Statement 15 as 15LETG=A*E-B*D. 
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With this preface, let us go through the example, step by step. The first statement, 10, is a 
READ statement. It must be accompanied by one or more DATA statements. When the computer 
encounters a READ statement while executing your program, it will cause the variables listed 
after the READ to be given values according to the next available numbers in the DATA state- 
ments. In the example, we read A in Statement 10 and assign the value 1 to it from Statement 
70 and similarly with B and 2, and with D and 4. At this point, we have exhausted the available 
data in Statement 70, but there is more in Statement 80, and we pick up from it the number 2 to 
be assigned to E. 

We next go to Statement 15, which is a LET statement, and first encounter a formula to be 
evaluated. (The asterisk is used to denote multiplication. ) In this statement we direct the 
computer to compute the value of AE - BD, and to call the result G. In general, a LET state- 
ment directs the computer to set a variable equal to the value of the formula on the right side of 
the equals sign. We know that if G is equal to zero, the system has no unique solution. There- 
fore, we next ask, in line 20, if G is equal to zero, If the computer discovers a ^^es" answer 
to the question, it is directed to go to Line 65, where it prints UNIQUE S0LUTI0N.^^ 
From this point, it would go to the next statement. But Lines 70, 80, and 85 give it no instruc- 
tions since DATA statements are not ''executed, " and it then goes to Line 90 which tells it to 
"END'' the program. 

If the answer to the question "Is G equal to zero?" is "no, " as it is in this example, the com- 
puter goes on to the next statement, in this case 30. (Thus, an IF-THEN tells the computer 
where to go if the IF condition is met but to go on to the next statement if it is not met.) The 
computer is now directed to read the next two entries from the DATA statements, -7 and 5, 
(both are in Statement 80) and to assign them to C and F, respectively. The computer is now 
ready to solve the system 

X + 2y = -7 4x + 2y = 5 

In Statement 37 and 42, we direct the computer to compute the values of X and Y according to 
the formulas provided. Note that we must use parentheses to indicate that CE - BF is divided 
by G; without parentheses, only BF would be divided by G, and the computer would let 
X= CE - BF/G. 

The computer is told to print the two values computed, that of X and that of Y, in Line 55. 
Having done this, it moves on to Line 60 where it is directed back to Line 30. If there are 
additional numbers in the DATA statements, as there are here in 85, the computer is told in 
Line 30 to take the next one and assign it to C, and the one after that to F. Thus, the computer 
is now ready to solve the system 

x+2y=l 4x+2y=3 

As before, it finds the solution in 37 and 42, and prints the values of X and Y in 55, and then 
is directed in 60 to go back to 30. 

In Line 30 the computer reads two more values, 4 and -7, which it finds in Line 85. It then 
proceeds to solve the system 

X + 2y = 4 4x + 2y = -7 

and to print out the solutions. It is directed back again to 30, but there are no more pairs of 
numbers available for C and F in the DATA statements. The computer then informs you that it 
is out of data, printing on the paper in your terminal 0UT 0F DATA IN 30, and stops. 
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For a moment, let us look at the importance of the various statements. For example, what 
would have happened if we had omitted Line 55? The answer is simple: The computer would 
have solved the three systems and told us when it was out of data. However, since it was not 
asked to tell us (PRINT) its answers, it would not do it, and the solutions would be the com- 
puter's secret. What would have happened if we had left out Line 20? In this problem just 
solved, nothing would have happened. But, if G were equal to zero, we would have set the com- 
puter the impossible task of dividing by zero in 37 and 42, and it would tell us so emphatically, 
printing DIVISION BY ZER0 IN 37 AND DIVISI0N BY ZER0 IN 42, Had we left out Statement 
60, the computer would have solved the first system, printed out the values of X and Y, and 
then gone on to Line 65 where it would be directed to print N0 UNIQUE S0LUTI0N. It would do 
this and then stop. 

One very natural question arises from the seemingly arbitrary numbering of the statements: Why 
this selection of line numbers? The answer is that the particular choice of line numbers is ar- 
bitrary, as long as the statements are numbered in the order which we want the machine to fol- 
low in executing the program. We could have numbered the statements 1, 2, 3, . . . , 13, although 
we do not recommend this numbering. We would normally number the statements 10, 20, 30, . . . , 
130. We put the numbers such a distance apart so that we can later insert additional statements 
if we find that we have forgotten them in writing the program originally. Thus, if we find that we 
have left out two statements between those numbered 40 and 50, we can give them any two num- 
bers between 40 and 50— say 44 and 46; and in the editing and sorting process, the computer will 
put them in their proper place . 

Another question arises from the seemingly arbitrary placing of the elements of data in the DATA 
statements: Why place them as they have been in the sample program? Here again, the choice is 
arbitrary, and we need only put the numbers in the order that we want them read (the first for A, 
the second for B, the third for D, the fourth for E, the fifth for C, the sixth for F, the seventh for 
the next C, etc.). In place of the three statements numbered 70, 80, and 85, we could have put 

?S DATA 1, 2, 4, 2, -7, 5, 1,3, 4, -7 



or we could have written, perhaps more naturally. 



7« DATA 1,2, 4, 2 
75 DATA -7, 5 

80 DATA 1, 3 

81 DATA 4, -1 



to indicate that the coefficients appear in the first data statement and the various pairs of 
right-hand constants appear in the subsequent statements. 
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The program and the resulting run is shown below exactly as it appears on the terminal: 



10 READ A3.B,E 
15 LET ^ A*E - B*D 
20 IF G«^0THEN65 
30EEADC,F 
37 LET X ^ iC^E - B*F)/G 
.42 LET Y ^ (A^F - Cm)/G 
55 PRINT X,y 
60 G0 T0 30 

65 PRINT ^^N0 UNIQUE S0LUTI0N^^ 
70 DATA 1,2,4 
80 DATA 2,'"7,5 
85 DATA 1,3, 4, -7 
9d END 



RUN 

LINEAR 15:07 

0.666667 0.166667 
-3.66667 3.83333 
0UT0FDATAIM3O 



After typing the program, we type RUN followed by a carriage return. Up to this point the 
computer stores the program and does nothing with it. It is this command which directs the 
computer to execute your program. 

Note that the computer, before printing out the answers, prints the name which we gave to the 
problem (LINEAR) and the time and date of the computation. * 

The message 0UT 0F DATA IN 30 here may be ignored. But sometimes it would indicate an 
error in the program. For more detail see the paragraph ''READ and DATA. " 



Formulas 

The computer can do a great many things - it can add, subtract, multiply, divide, extract 
square roots, raise a number to a power, and find the sine of a number (on an angle measured 
in radians), etc. We shall now learn how to tell the computer to do these things in the order 
that we want them done. 

The computer computes by evaluating formulas which are supplied in a program. These for- 
mulas are similar to those used in standard mathematical calculation, except that all BASIC 
formulas must be written on a single line. Five arithmetic operations can be used to write a 
formula. These are listed in the following table: 



*The time zone and date are not shown in this and subsequent examples. 



Symbol 



Example 



Meaning 



+ 



A+ B 



Addition (add B to A) 



A - B 



Subtraction (subtract B from A) 



* 



A * B 



Multiplication (multiply B by A) 



I or ** 



A / B Division (divide A by B) 

X + 2 or X ** 2 Raise to the power (find X^) 



NOTE: Some terminals use a a in place of the I . 



We must be careful with parentheses to make sure that we group together those things which we 
want together. We also must understand the order in which the computer does its work. For 
example, if we type A + B * C I D, the computer will first raise C to the power D, multiply this 
result by B, and then add A to the resulting product. This is the same convention as is usual for 
A + B C^. If this is not the order intended, then we must use parentheses to indicate a different 
order. For example, if it is the product of B and C that we want raised to the power D, we must 
write A + (B * C) ID; or, if we want to multiply A + B by C to the power D, we write 
(A + B) * C I D. We could even add A to B, multiply their sum by C, and raise the product to 
the power D by writing ((A+B) *C) + D. 

The order of priorities is summarized in the following rules: 

1 . The formula inside parentheses is computed before the parenthesized quantity is used 
in further computations. 

2. In the absence of parentheses in a formula involving addition, multiplication, and the 
raising of a number to a power, the computer first raises the number to the power, 
then multiplies, then adds. Division has the same priority as multiplication, and 
subtraction the same as addition. 

3. In the absence of parentheses in a formula involving only multiplication and division, 
the operations are done from left to right, as they are read. Addition and subtrac- 
tion are also done from left to right. 

These rules are illustrated in the previous example. The rules also tell us that the computer, 
faced with A - B - C, will (as usual) subtract B from A and then C from their difference; faced 
with A/B/C, it will divide A by B and that quotient by C. Given Al B I C, the computer follows 
the usual mathematical convention and calculates ABC, if there is any question in your mind 
about the priority, put in more parentheses to eliminate possible ambiguities. 

In addition to these five arithmetic operations, the computer can evaluate several mathematical 
functions. These functions are given special three-letter English names, as the following list 
shows: 
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Functions 


Interpretation 






SIN (X) 
COS (X) 
TAN (X) 


Find the sine of X 
Find the cosine of X 
Find the tangent of X 




X interpreted as 
a number, or as 
an angle measured 
in radians 


COT (X) 


Find the cotangent of X 






ATN (X) 


Find the arctangent of X 






EXP (X) 


Find e 






LOG (X) 


Find the natural logarithm of X (In 


X) 


ABS (X) 


Find the absolute value of X (IXI) 




SQR (X) 


Find the square root of X (>/X) 





Two special functions, NUM and DET, are explained under Matrices in Section 3. Three other 
mathematical functions are also available in BASIC: INT, SGN, and RND. These are explained 
under Functions in Section 3. In place of X, we may substitute any formula or any number in 
parentheses following any of these formulas. For example, we may ask the computer to find 
•n/4 + X3 by writing SQR (4 + X + 3), or the arctangent of 3X - 2eX + 8 by writing ATN 
(3*X-2*EXP(X) + 8). 

5 

If, sitting at the terminal, you need the value of (^) 17, you can run the two-line program 



10 msm (5/6) 4 17 

20 ENp 



Since we have mentioned numbers and variables, we should be sure that we understand how to 
write numbers for the computer and what variables are allowed. 



Numbers 

A number may be positive or negative and it may contain up to nine digits, but it must be ex- 
pressed in decimal form. For example, all of the following are numbers in BASIC: 2, -3.675, 
1234 56 789, -.9876 54321, and 483.4156. The following are not numbers in BASIC: 14/3, n/7, 
and .00123456789. The first two are formulas but not numbers, and the last one has more than 
nine digits. We may ask the computer to find the value of 14/3 or VT and to do something with 
the resulting number, but we may not include either in a list of DATA. 

We gain further flexibility by use of the letter E, which stands for 'times ten to the power. " 
Thus, we may write .00123456789 in a form acceptable to the computer in any of several forms: 
.123456789E-2 or 123456789E-11 or 1234. 56789E-6. We may write ten million as 1E7 and 
1965 as 1.965E3. We do not write E7 as a number but must write 1E7 to indicate that it is 1 
that is multiplied by lO'^. Numbers cannot be larger than 1.70141E38 or smaller than 1.49637E- 
39. 

When entering a series of numbers, separate them by commas. The comma following the last 
number is optional. 
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Variables 



A variable in BASIC is denoted by any letter, or by any letter followed by a single digit. Thus, 
the computer will interpret E7 as a variable, along with A, X, N5, 10, and 01. A variable in 
BASIC stands for a number, usually one that is not known to the programmer at the time the 
program was written. Variables are given or assigned by F0R, LET, READ, or INPUT state- 
ments. The value assigned will not change until the next time a F0R, LET, READ, or INPUT 
statement is encountered with a value for that variable. 

Note that since all variables are set to zero before a RUN, it is necessary to assign a value to 
a variable only when you do not want it to be zero. 



Relational Symbols 



Six mathematical symbols are provided for in BASIC. These are symbols of relation used in 
IF-THEN statements where it is necessary to compare values. An example of the use of these 
relation symbols was given in the sample program in Section 1 . Any of the following six 
standard relations may be used: 



Symbol Example Meaning 

= A = B Is equal to (A is equal to B) 

< A < B Is less than (A is less than B) 

A<=B Is less than or ^qual to 

(A is less than or equal to B) 

> A > B Is greater than (A is greater than B) 

>= A>=B Is greater than or equal to 

(A is greater than or equal to B) 

<> AoB Is not equal to (A is not equal to B) 



Loops 

We are frequently interested in writing a program in which one or more parts are done not just 
once but a number of times, perhaps with slight changes each time. In order to write the 
simplest program, the one in which the part to be repeated is written just once, we use the 
programming device known as a loop. 

Programs which use loops can be illustrated and explained by two programs for the simple task 
of printing out a table of the first 100 positive integers together with the square root of each. 
Without a loop, our program would be 101 lines long and read 



10 PRte 1> S<^ (1) 
m& PRINT 98, Sm (99) 

torn mmttm, sqr<ioo) 

1010 EM) 
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With the following program, using one type of loop, we can obtain the same table with far fewer 
lines of instruction, 5 instead of 101, 



10 








PRINT X, Sm (X) 




30 


LET,X«X+1 




40 


II'X< WOl'HEN 20 




80 





Statement 10 gives the value of 1 to X and "initializes" the loop. In Line 20 is printed both 1 
and its square root. Then, in Line 30, X is increased by 1, to 2. Line 40 asks whether X is 
less than or equal to 100; an affirmative answer directs the computer back to Line 20. Here it 
prints 2 and >/2, and goes to 30. Again X is increased by 1, this time to 3, and at 40 it goes 
back to 20. This process is repeated- -Line 20 (print 3 and >/3), Line 30 (X = 4), Line 40 (since 
4 ^ 100 go back to line 20), etc. --until the loop has been traversed 100 times. Then, after it 
has printed 100 and its square root has been printed, X becomes 101. The computer now 
receives a negative answer to the question in Line 40 (X is greater than 100 , not less than or 
equal to it), does not return to 20 but moves on to Line 50, and ends the program. All loops 
contain four characteristics: initialization (Line 10), the body (Line 20), modification (Line 30), 
and an exit test (Line 40). 

Because loops are so important and because loops of the type just illustrated arise so often, 
BASIC provides two statements to specify a loop even more simply. They are the F0R and 
NEXT statements, and their use is illustrated in the program, 

10 F0RX«^ 1T01OO 
20 mmT X, SQR (X) 



In Line 10, X is set equal to 1, and a test is set up, like that of Line 40 above. Line 30 carries 
out two tasks: X is increased by 1, and the test is carried out to determine whether to go back 
to 20 or go on. Thus Lines 10 and 30 take the place of Lines 10, 30, and 40 in the previous 
program- -and they are easier to use. 

Note that the value of X is increased by 1 each time we go through the loop. If we wanted a 
different increase, say 5, we could specify it by writing 

to F0EX^^ 1 100 STEP 5 



and the computer would assign 1 to X on the first time through the loop, 6 to X on the second 
time through, 11 on the third time, and 96 on the last time. Another step of 5 would take X 
beyond 100, so the program would proceed to the end after printing 96 and its square root. The 
STEP may be positive or negative nd we could have obtained the first table, printed in reverse 
order, by writing line 10 as 



Id W0RX^ im T0 1 STEP 


Ililiillllllll^^^BI 







In the absence of a STEP instruction, a step size of +1 is assumed. 
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More complicated F0R statements are allowed. The Initial value, the final valine, and the step 
size may all be formulas of any complexity. For example, if N and Z have beenigecified 
earlier in the program, we could write 

F0R X = N + 7*Z T0 (Z-N) / 3 STEP (N-4*Z) / 10 

For a positive step-size, the loop continues as long as the control variable is less than or 
equal to the final value. For a negative step-size, the loop continues as long as the control 
variable is greater than or equal to the final value. 

If the initial value is greater than the final value ( less than for negative step-size), then the 
body of the loop will not be performed at all, but the computer will immediately pass to the 
statement following the NEXT. As an example, the following program for adding up the first n 
integers will give the correct result when n is 0. 



mpmrns 

9() DAirA:3> id, o 



It is often useful to have loops within loops. These are called nested loops and can be expressed 
with F0R and NEXT statements. However, they must actually be nested and must not cross, as 
the following skeleton examples illustrate: 



Allowed 



F0RX 
F0R Y 
NEXT Y 
NEXTX 



Not Allowed 

- F0RX 
-F0R Y 

- NEXT X 



NEXT Y 



[ 



Allowed 
- F0RX 
_F0R Y 
F0R Z 
NEXT Z 



r— F0R W 

I— NEXT W 

NEXT Y 

r— F0R Z 

L- NEXT Z 
NEXT X 
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Lists and Tables 

In addition to the ordinary variables used by BASIC, there are variables which can be used to 
designate the elements of a list or of a table. These are used where we might ordinarily use a 
subscript or a double subscript, for example the coefficients of a polynomial (ao, ai, a2, . . .) 
or the elements of a matrix (bi, j). The variables which we use in BASIC consist of a single 
letter, which we call the name of the list, followed by the subscripts in parentheses. Thus, we 
might write A(l), A(2), etc. , for the coefficients of the polynomial and B(l, 1), B(l, 2), etc. , for 
the elements of the matrix. 

We can enter the list A(0), . . . A(10) into a program very simply by the lines 



1OF0HI^OT0 10 
20 HEAD A{I) 
30 NEXT! 

40 DATA 2, 3, -S, 7, 2.2, 4, -0, 123, 4, -4, 3 



We need no special instruction to the computer if no subscript greater than 10 occurs. How- 
ever, if we want larger subscripts, we must use a dimension (DIM) statement, to indicate to 
the computer that it has to save extra space extra space for the list or table. When in doubt, 
indicate a larger dimension than you expect to use. For example, if we want a list of 15 
numbers entered, we might write 



lODIM A<25) 
20 READ n 
3OF0KI«IT0N 
40 READ MX) 
50 NEXT I 
60 DATA 15 

to DATA 2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47 



Statements 20 and 60 could have been eliminated by writing 30 as F0R 1=1 T0 1 5, but the form 
as typed would allow for the lengthening of the list by changing only Statement 60, so long as it 
did not exceed 25. 



We would enter a 3x5 table into a program by writing 



10 r0R I » 




20 WR J ~ 


iBpiteiiiiiiiiiiiillillllllil^ 


SO BEAD B 




40 NEXT J 




50NEXTI 






lliililiiliilliiiillilB^^ 


70 DATA 4^ 


■lipililllllPllliB^^^^ 


80 DATA 8, 
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Here again, we may enter a table with no dimension statement, and it will handle all the entries 
from B(0, 0) to B(10, 10). If you try to enter a table with a subscript greater than 10, without a 
DIM statement, you will get an error message telling you that you have a subscript error. This 
is easily rectified by entering the line 



5 DIM B(20, 30) 



if for instance, we need a 20 by 30 table. 

The single letter denoting a list or a table name may also be used to denote a simple variable 
without confusion. However, the same letter may not be used to denote both a list and a table in 
the same program. The form of the subscript is quite flexible, and you might have the list item 
B(I + K) or the table items B(I,K) or Q(A(3,7), B - C). 

The sample program which follows illustrates a LIST and RUN of a problem which uses both a 
list and a table. The program computes the total sales of each of five salesmen, all of whom 
sell the same three products. The list P gives the price/item of the three products, and the 
table S shows the quantity of each item sold by each man. You can see from the program that 
product number 1 sells for $1. 25, number 2 for $4.30, and number 3 for $2. 50 per item; and 
also that salesman number 1 sold 40 items of the first product, 10 of the second, and 35 of the 
third, and so on. The program reads in the price list in Lines 10, 20, 30, using data in Line 
900, and the sales table in Lines 40-80, using data in Lines 910-930. The same program could 
be used again, modifying only Line 900 if the prices change, and only Lines 910-930 to enter 
the sales in another month. 

This sample program did not need a dimension statement since the computer automatically saves 
enough space to allow all subscripts to run from to 10. A DIM statement is normally used to 
save more space, but in a long program, requiring many small tables, DIM may be used to save 
less space for tables in order to leave more for the program. 

Since a DIM statement is not executed, it may be entered into the program on any line before 
END; it is convenient, however, to place DIM statements near the beginning of the program. 



BALMS! 08:59 
10 F0RI= 1T0S 

20 mm KD 
ae OTXT I 

m F0E J - 1 T0 5 

60 BEAD Sa, J) 

70 EBXT 3 

80 HEXT I 

9OF0RJ«iT0S 

100 LET B^O 

11OF0RI«^ 1T0 8 

120 IMTS^B^ Pa)*S(I»J) 

130 mXT I 

im mwr '^t0tal sales for salesmah s 

180 NEXT 3 

900 DATA 2. m 

910 DATA 40, 20, 37, 29, 42 
920 DATA S, 21, 8 

9S0DATA 35> 47, 29, 18; 33 
999 EHD 
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BEADY 



SALES 1 00:00 

T0TAL SALES F0R SALESMAN 1 $180.5 
, T0TAh SALES F0H SALESMAN 2 $ 211,3 
T0TAL SALES F0ESALESMAH 3 $131.65 
T#TAL SALES F0R SALESMAN 4 $166.55 
T0TAL SALES F0R SALESMAN 5 $ i69,4 



Errors and Debugging 

It may occasionally happen that the first run of a new problem will be free of errors and give 
the correct answers. But it is much more common that errors will be present and will have to 
be corrected. Errors are of two types: errors of form (or grammatical errors) which prevent 
the running of the program; and logical errors in the program which cause the computer to 
produce wrong answers or no answers at all. 

Errors of form will cause error messages to be printed, and the various types of error 
messages are listed and explained in Appendix A. Logical errors are often much harder to 
uncover, particularly when the program gives answers which seem to be nearly correct. In 
either case, after the errors are discovered, they can be corrected by changing lines, by in- 
serting new lines, or by deleting lines from the program. As indicated in the last section, a 
line is changed by typing it correctly with the same line number; a line is inserted by typing it 
with a line number between those of two existing lines; and a line is deleted by typing its line 
number and pressing the Return key. Notice that you can insert a line only if the original line 
numbers are not consecutive integers. For this reason, most programmers will start out 
using line numbers that are multiples of five or ten, but that is a matter of choice. 
These corrections can be made at any time— whenever you notice them--either before or after 
a run. Since the computer sorts lines out and arranges them in order, a line may be retyped 
out of sequence. Simply retype the incorrect line with its original line number. 

Although the computer does little in the way of "correcting" during computation, it will some- 
times help you when you forget to indicate absolute value. For example, if you ask for the 
square root of -7 or the logarithm of -5, the computer will give you the square root of 7 with 
the error message that you have asked for the square root of a negative number, or the 
logarithm of 5 with the error message that you have asked for the logarithm of a negative 
number . 

As with most problems in computing, we can best illustrate the process of finding the errors 
(or bugs) in a program, and correcting (or debugging) it, by an example. Let us consider the 
problem of finding the value of X between and 3 for which the sine of X is a maximum, and 
ask the system to print out this value of X and the value of its sine. If you have studied 
trigonometry, you know that 7r/2 is the correct value; but we shall use the system to test suc- 
cessive values of X from to 3, first using intervals of .1, then of .01, and finally of .001. 

Thus, we shall ask the system to find the sine of 0, of .1, of .2, of .3 , of 2.8, of 2.9, 

and of 3, and to determine which of these 31 values is the largest. It will do it by testing SIN 
(0) and SIN (. 1) to see which is larger, and calling the larger of these two numbers M. Then 
it will pick the larger of M and SIN (. 2) and call it M. This number will be checked against 
SIN (.3) and so on down the line. Each time a larger value of M is found, the value of X is 
"remembered" in XO. When it finishes, M will have been assigned to the largest of the 31 
sines, and XO will be the argument that produced that largest value. It will then repeat the 
search, this time checking the 301 numbers 0, .01, .02, .03, 2.98, 2.99, and 3, finding 

the sine of each and checking to see which sine is the largest. Lastly, it will check the 3001 
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numbers 0, .001, .002, .003, , 2.998, 2.999, and 3, to find which has the largest sine , 

At the end of each of these three searches, we want the computer to print three numbers: the 
value XO which has the largest sine, the sine of that number, and the interval of search. 

Before going to the terminal, we write a program and let us assume that it is the following: 



M'B'm^'¥t> T0 3 STEP D 
,# iF|#;(^ U THEN 100 



";)im^'BAtk .01, .001 



We shall list the entire sequence on the terminal and make explanatory comments on the right 
side . 



- mitm -mm^ ^mM- maxsm 

S0i^X»QT#SSTEFD 
40IFSMMX) < «M THEN 100 
S0XJSTX0«X 
"60-tETM»BMCX) 

mtm ■;, 



i Notice the use of the backwards arrow 
i (on some terminals, an underline) to 
erase a character in Line 40, which 
: should have started IF SIN(X) etc. , and 
I in Line 80. 

After typing Line 90, we notice that LET 
was mistyped in Line 20, so we retype it, 
this time correctly. 



MAXSM 



08:30 



ILI^QAL VAKIABI^ IN 70 
NSXTIN30 



After receiving the first error message, 
we inspect Line 70 and find that we used 
X0 for a variable instead of XO. The 
next two error messages relate to lines 
30 and 80, where we see that we mixed 
variables. This is corrected by changing 
Line 80. 



NOTE: The use of the word "LET" is assignment statements is optional, 
be written X0=0. 



Line 20 could also 
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70 pmm xo,x,D 

«0IFSIN(X) -M THEN 80 
80 NEXT X 



HIM 



0.2 
0,3 



09:31 
0.2 



0.1 
0,1 



Mm 

MAXSIN 09:32 

UMJEFBIEB LIHBS mJMBER 20 IN 90 

90 G0 T0 10 

mm 



MAXSIN 

OA 
0.2 
0.3 



09:32 

0.1 
0.2 



0.1 
0.1 



86PR»rrXO,M,D, 

5 PRINT VAL0E*% EES0LOTI0N" 



MAXSm 



):S4 



H.LEGAI. VARIABLE IN 5 
S PRINT ^^VAI.t;E*% "SINE*% ^*RES0LtlTI0N*^ 



RES0LtJTI0N 
0.1 
0.01 
,0.001 




0,8995?4 

I>;AirA.M 10 



We make both of these changes by retyping 
Lines 70 and 80. In looking over the pro- 
gram, we also notice that the IF-THEN 
statement in 40 directed the computer to 
a DATA statement and not to Line 80 
where it should go. 

This is obviously incorrect. We are 
having every value of X printed, so we 
direct the machine to cease operations by 
pressing the break key, even while it is 
running. We ponder the program for a 
while, trying to figure out what is wrong 
with it. We notice that SIN(O) is com- 
pared with M on the first time through 
the loop, but we had assigned a value to 
XO bu»t not to M. However we recall that 
all variables are set equal to zero before 
a RUN so that line 20 is unnecessary. 

Of course, Line 90 sent us back to Line 
20 to repeat the operation and not back to 
Line 10 to pick up a new value for D. 

We are about to print out the same table 
as before. It is printing out XO, the 
current value of X, and the interval size 
: each time that it goes through the loop. 



We fix this by moving the PRINT state- 
ment outside the loop. Typing 70 deletes 
that line, and line 85 is outside of the 
loop. We also realize that we want M 
printed and not X. We also decide to put 
in headings for our columns by a PRINT 
statement. 




There is an error in our PRINT state- 
ment: no left quotation mark for the third 
item. 

Retype Line 5, with all of the required 
quotation marks. 

Exactly the desired results. Of the 31 
numbers (0, .1, .2, .3, 2.8, 2.9, 
3), it is 1.6 which has the largest sine, 
namely .999574. Similarly for the finer 
subdivisions. 
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X.1BT 


Having changed so many parts of the 




program, we ask for the corrected pro- 


MAXSIN 09:35 


gram. 


5 PEINT "X VALUE", "SINE", 


"RES0LUTI0N" 






so F0R X=0 T0 3 STEP D 




40 IF SIN(X) = M THEN 80 




50 LET XO » X 




60 LETM»SIN(X) 




80 NEXT X 




oD JrKJJN i. AU^M, JJ 




90 00 T0 10 




100 DATA .1,-01,. 001 




110 END 




READY 




SAVE 


The program is saved for later use. This 


READY 


should not be done unless future use is 




necessary. 



In solving this problem, there are two common devices which we did not use. One is the in- 
sertion of a PRINT statement when we wonder if the machine is computing what we think we 
asked it to compute. For example, if we wondered about M, we could have inserted 65 
PRINT M, and we would have seen the values. The other device is used after several correc- 
tions have been made and you are not sure just what the program looks like at this stage - in 
this case type LIST, and the computer will type out the program in its current form for you to 
inspect. 

Summary of Elementary Basic Statements 

In this section we shall give a short and concise description of each of the tjrpes of BASIC state- 
ments discussed earlier in this section. In each form, we shall assume a line number, and 
shall use underlining to denote a general type. Thus, variable refers to a variable, which is a 
single latter, possibly followed by a single digit. 

LET Statement 

The LET statement is referred to as a replacement or assignment statement. It has the form 

/ Constant 
LET variable = } Variable 

( Arithmetic Expression 

Examples: 

■■■■llilllS 

LET V9 ^ V7 + 12 

The expression on the right of the equals sign is evaluated, and the result is stored as the value 
of the variable on the left of the equals sign. 

Multiple assignments may be made with the LET statement. For example, 
LET XI « Xa ^ P(S) 
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The word ''LET" is optional in both the simple assignment and multiple assignment statements. 
LET statements may be of the form 



Variable = 



Constant 
Variable 
Expression 



For example, X = (A=3) * (B=4) 
READ and DATA Statement 

We use a READ statement to assign to the listed variables values obtained from a DATA state- 
ment. Neither statement is used without one of the other type. A READ statement causes the 
variables listed in it to be given, in order, the next available numbers in the collection of DATA 
statements. Before the program is run, the system takes all of the DATA statements in the order 
in which they appear and creates a data block. Each time a READ statement is encountered any- 
where in the program, the data block supplies the next available number or numbers. If the data 
block runs out of data, with a READ statement still asking for more, the program is assumed 
to be done and we get an 0UT 0F DATA message. 

Since we have to read in data before we can work with it, READ statements normally occur near 
the beginning of a program. The location of DATA statements is arbitrary, as long as they oc- 
cur in the correct order. A common practice is to collect all DATA statements and place them 
just before the end statement. 

Each READ statement is of the form: READ sequence of variables and each DATA statement of 
the form: DATA sequence of numbers 



234 READ B (K) 

263 DATA 2, 3, 5, 7, 9, 11, 10, 8, 6, 4 H 

10 READ R (I, J) : 
440 DATA -3, 5, -9, 2.37, 2.9876, -437.234E-5 
450 DATA 2.765, 5.5576, 2.3789E2 

When entering numeric values, remember thatjonly numbers are put in a DATA statement^! 
that 15/7 and are expressions, not number 87"^""""""" '"^^ — _ _ . j 



PRINT Statement 

The PRINT statement has a number of different uses and is discussed in more detail in Section 
3. The common uses are 

a. To print out the result of some computations 

b. To print out verbatim a message included in the program 

c. To perform a combination of a and b 

d. To skip a line 

We have seen examples of only the first two in our sample programs. Each type is slightly 
different in form, but all start with PRINT after the line number. 



Examples: 



150 
330 
340 



READ X, Y, Z, XI, Y2, Q9 
DATA 4, 2, 1.7 

DATA 6.734E-3, -174.321, 3.14159265 
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Examples of type a: 



XOOP^iNT t, SQK{X) 




iiiiiiiiiii^Miliii^iiii 
iiMiliBilHipiiliBI 






fCF (A - B) 







The first will print X and then, a few spaces to the right of that number, its square root. The 
second will print five different numbers: X, Y, Z, b2 - 4AC, and e^-B, xhe system will com- 
pute the two formulas and print them for you, as long as you have already given values to A, B, 
C. It can print up to five numbers per line in this format. 

Examples of type b: 



Both have been encountered in the sample programs. The first prints that simple statement; the 
second prints the three labels with spaces between them. The labels in 430 automatically line 
up with three numbers called for in a PRINT statement - as seen in MAXSIN. 

Examples of type c: 

so PHPT r^OT SQUABE nq/i^T 0F^;X; ^^W; SQR (X) >- \ 



If the first has computed the value of X to be 3, the system will print out: THE VALUE 0F X 
IS 3. If the second has computed the value of X to be 625, the system will print out: THE 
SQUARE RQi^fT 0F 625 IS 25. 

Example of type d: 



The system will advance the paper one line when it encounters this command. 



Gd Td Statement 

There are times in a program when you do not want all commands executed in the order that 
they appear in the program. An example of this occurs in the MAXSIN problem where the 
system has computed XO, M, and D and printed them out in Line 85. We did not want the pro- 
gram to go on to the END statement yet, but to go through the same process for a different 
value of D. So we directed the system to go back to Line 10 with a G0 T0 statement. Each is 
of the form G0 T0 line number . 

Example: 



■Hi 
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IF — THEN or IF — G0 T0 Statement 



There are times that we are interested in jumping the normal sequence of commands if a cer- 
tain relationship holds. For this we use an IF- -THEN statement, sometimes called a conditional 
G0 T0 statement. Such a statement occurred at Line 40 of MAXSIN. Each such statement is 
of the form 

IF formula relation formula THEN line number or IF formula relation formula G0 T0 
line number 

Examples: 



40 ir 

2011* 


m M < » M Tmn m or 40 if sm (x) < <= m g0 t0 so 

U.f"$t^n U , , , -or 20 If G = G0 6S 











Line 40 asks if the sine of X is less than or equal to M, and directs the system to skip to Line 
80 if it is. Line 20 asks if G is equal to 0, and directs the system to skip to Line 65 if it is. In 
each case, if the answer to the question is ''N0'\ the system will go to the next line of the 
program. 



F0R and NEXT Statement 

We already have encountered the F0R and NEXT statements in our loops and have seen that they 
go together, one at the entrance to the loop and one at the exit, directing the system back to the 
entrance again. Every F0R statement is of the form 

F0R variable = formula T0 formula STEP formula 

Most commonly, the formulas will be integers and the STEP omitted. In the latter case, a step 
size of one is assumed. The accompanying NEXT statement is simple in form, but the variable 
must be precisely the same one as that following F0R in the F0R statement. Its form is NEXT 
variable . The variable following the word 'T0R" is called the index. 



Examples: 



30 JP0RX » 3 STEP P 






120 X4 w ilf + C(2^ iZWt T0 3*SQR 
2SS NEXT X4 


(10) ST 


IHIlilii^SIIIIBIHI^IIIlU 


240 F0H X « 8 T0 3 STEP -1 






486 f0lJ « 3T0 irsTBP 2 







Notice that the step size may be a formula (1/4), a negative number (-1), or a positive number 
(2). In the example with Lines 120 and 235, the successive values of X4 will be . 25 apart, in 
mcreasmg order. In the next example, the successive values of X will be 8, 7, 6, 5, 4, 3 In 
the last example, on successive trips through the loop, J will take on values -3, -1, 1, 3, 5, 7 
9, and 11. 

If the initial, final, or step-size values are given as formulas, these formulas are evaluated 
only once, upon entering the F0R statement. The index variable can be changed in the body of 
the loop; the exit test always uses the latest value of this variable . 
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If you write 50 F0R Z = 2 T0 -2 without a negative step size, the body of the loop will not be 
performed, and the system will proceed to the statement immediately following the correspond- 
ing NEXT statement. K you write 50 FOR Z = 1 T0 1 without a step size, the body of the loop 
will be executed once. 

BASIC does not check for a step size of zero. It is possible to set up a loop with a step size 
that at some time may become zero, and the result will be looping without end. If the step size 
might give you problems in any program, include a test that will cause an exit from the loop on 
finding a zero step size. For this and other reasons, manipulating the value of the index in the 
body of the loop is not recommended. 

In the sequence of program statements which follow, the loop with the index J is said to be 
"nested^* within the loop with the index I: 



to r0RI^ 1 T0 10 
2OF0RJ^ 1 T0 2O 
30RBiU3 A(I,J) 
40 NEXT J 
§0 HEXT I 



Nesting to a depth greater than 20 is not allowed. 



DIM Statement 

Whenever we want to enter a list or a table with a subscript greater than 10, we must use a 
DIM statement to instruct the system to save us sufficient room for the list or the table. 

Examples: 



20BIMH(35) 
25 DIM Q (5,25) 



The first would enable us to enter a list of 35 items and the second a table 5 by 25. 



END Statement 

Every program must have an END statement, and it must be the statement with the highest 
line number in the program. Its form is simple: a line number with END. 

Example: 
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Section 3. ADVANCED BASIC 



More About the PRINT Statement 

The uses of the PRINT statement were described in Section 2, but we shall give more detail 
here. Although the format of answers is automatically supplied for the beginner, the PRINT 
statement permits a greater flexibility for the more advanced programmer who wishes a dif- 
ferent format for his output. 

The terminal line is divided into five zones of fifteen spaces each. Some control of these 
comes from the use of the comma. A comma is a signal to move to the next print zone or if the 
fifth print zone has just been filled, to move to the first print zone of the next line. 

A closer grouping of numbers can be obtained by use of the semicolon. Numbers printed next 
to each other by use of the semicolon will be in closest readable format. For example, if you 
were to write the program 



10 F0R I = 1 T0 15 
20 PRINT I 
30 NEXT I 
40 END 



the terminal would print 1 at the beginning of a line, 2 at the beginning of the next line, and so 
on, finally printing 15 on the fifteenth line. But, by changing Line 20 to read 



20 PRINT I, 



you would have the numbers printed in the five print zones, reading 



12 3 4 6 

6 7 8 9 10 

11 12 13 14 15 



If you wanted the numbers printed in this fashion but more tightly packed, you would change line 
20, replacing the comma with a semicolon. 



20 PRINT I; 



The result would be printed 



1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 



You should remember that a label inside quotation marks is printed just as it appears and also 
that the end of a PRINT line signals a new line, unless a comma or semicolon is the last 
symbol. When a label is followed by a semicolon, the label is printed with no space after it. 

Thus, the instruction 
SO^RIHTX, Y 
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will result in the printing of two numbers and the return to the next line, while 




will result in the printing of these two values and no return— the next number to be printed will 
occur in the third zone, after the values of X and Y in the first two. 

Since the end of a PRINT statement signals a new line. 




will cause the terminal to advance the paper one line. It puts a blank line in your output if you 
want to use it for vertical spacing of your results, or it causes the completion of a partially 
filled line, as illustrated in the following sequence of program statements: 




This program will print B(l , 1) B(l , 2). . . B(l ,M) on one line if there is sufficient space. With- 
out Line 140, the terminal would then go on printing B(2, 1), B(2, 2). . . B(2,M) on the same line, 
and even B(3,l), B(3,2), etc. , if there were room. Line 140 directs the terminal after printing 
B(l, 1), B(l,2), . . .the values corresponding to I = 1, to start a new line and to do the same 
thing after printing the values cpr responding to I = 2, etc. 

The following rules for the printing of numbers will help you in interpreting your printed 
results: 

1. If a number is an integer, the decimal point is not printed. If the integer contains 
more than nine digits, the terminal will give you the first digit, followed by (a) a 
decimal point, (b) the next five digits, and (c) write E followed by appropriate integer. 
For example, it will write 32, 437, 580, 259 as 3.24376 E 10. 

2. For any decimal number, no more than six significant digits are printed. 

3. For a number less than 0. 1, the E notation is used unless the entire significant part 
of the number can be printed as a six-decimal number. Thus, . 03456 means that the 
number is exactly .0345600000, while 3.45600 E - 2 means that the number has been 
rounded to .0345600. 

4. Trailing zeros after the decimal point are not printed. 

The following program, in which we print out the first 45 powers of 2, shows how numbers are 
printed. The semicolon "packed'^ form sometimes causes the last few characters in a number 
to be printed on top of one another. BASIC checks to see if there are 12 or more spaces at the 
end of a line before printing a number there, but some numbers require 15 spaces. 
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M you are using a wide carriage terminal (more than 75 characters per line) and wish to print 
more than 75 characters per Hne, you should use the MARGIN statement in the following manner 

line number MARGIN # file designator , margin value 

or 

line number MARGIN # file designator : margin value 

When the system receives a margin value of 0, the margin at the terminal is assumed to be 
infinite . 

The TAB Function 

The TAB (TABULATE) function permits you to specify tabulated formatting. For example, TAB 
(17) would cause the teletypewriter to move to column 17. Positions on a line are numbered 
through 74; 75 is assumed to be position again. 

TAB may contain any formula as its argument and may be the first argument after PRINT. The 
value of the formula is computed, and its integer part is taken. This in turn is treated modulo 
75, provided there is no preceding MARGIN command, to obtain a value through 74. The 
teletypewriter is then moved to this position. If it already has passed this position, the TAB is 
ignored. For example, inserting the following line in a loop: 



causes the X- values to start in column 0, the Y-values to start in column 12, and the Z -values 
in column 27. 

Combined with appropriate use of the MARGIN command, you may TAB up to 158 characters If 
all of the digits in a number and one additional blank cannot be printed on one line the entire 
number will be printed on the next line starting in column 0. 
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Formatted Output 



PRINT USING and Image Statements 

The PRINT USING and image statements provide formatted line output of up to 158 characters 
per line, not including carriage return and line feed, without using the MARGIN statement. 

The PRINT USING statement is in one of the following forms: 
PRINT USING line number , output list 

or 

PRINT USING string variable , output list 

In the first form the line number is that of the image statement to be used in formatting the 
output line. In the second form, the image statement is a character string stored in the desig- 
nated string variable. 

The output list consists of elements to be placed in the output line. The elements may be 
numbers, expressions, string constants, string variables , or functions. 

Punctuation (delimiter) between elements in the list may be either commas or semicolons. 

Each PRINT USING statement begins in the first field in the referenced image statement, even 
if a previous list has not used all fields in that image statement; it also starts a new line of 
output. If there are more data elements than replacement fields, the image is reused, starting 
with the first replacement field, on a new line. 

The form of the image statement is 
line number: line image 

where the line number is that in a PRINT USING statement, and the line image consists of for- 
mat control characters and printable constants. 

An image statement may be assigned to a string variable in the following way: 

LET string variable =^^ line image^ ^ 
Format control characters are 

' (Apostrophe) a one-character field that is filled with the first character of an alpha- 
numeric string regardless of the string length. 

E A continuation character which must be preceded by the apostrophe, for example, 
'EEE . . . E . This specifies Igftjustific^^ of the data within the field if the data 
does not fill the field, and f^^^^^SJoJ^Iii!}^ overflows the field. 

L A continuation character which must be preceded by the apostrophe, for example, 
»LLL. . . L. This specifies le|L j-ustification of the data within the field. If the output 
element overflows the field, the fieldjsj£tjvid^^^ and the element is truncated on 
the right . 

R A continuation character which must be preceded by the apostrophe, for example, 
RRR. . .R. This specifies ijght justifi cation of the output element within the field. 
If the element overflows the^eld, if is truncated on th^^^ 
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C A continuation character which must be preceded by the apostrophe, for example, 
'CCC. . .C. This specifies centering the output element within the field. If the 
element overflows the field,' it is truncated on the right. 

# (Poxind sign) the replacement field for a numeric character. 



(Four up-arrows) scientific notation for a decimal field. 

$ (Dollar sign) the replacement field for a dollar sign. When placed at the beginning 
of a decimal or integer field, it causes a dollar sign to be printed to the left of the 
numeric data in that position. 

All other characters are treated as printable constants. 

The image consists of one or more replacement fields. Together these form a pictorial layout 
of the line to be printed. Every data element in the output list replaces a replacement field in 
the image statement. 

There are six types of fields: 

• Integer fields 
e Decimal fields 

• Exponential fields 

• Dollar sign fields 

© Alphanumeric fields 
9 Literal fields 

Integer Fields 

The following rules apply to integer fields 

• An integer field is composed of pound signs (#). 

« If the number overflows the field, an asterisk is printed and the field is widened to 
the right. 

«> Numbers in an integer field are right -justified and truncated if not integers. 

• Any number equal to or greater than 2+27 is converted according to the format 

###.#### +m. 

• The sign of the number is included in the field width. 



Example : 



100: #### ##### ### 

120 PiaNTTBING 10O,A,B,C 
130 001^ 110 

140 DATA 123.45^-34.856,45.7,457,34, 

mm " 


-17,1289,995 


llllll 
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INTEGERf 

m -34 48 

457 -IT *1289 

0m 0F DATA m 110 



Example of image statement assigned to string variable: 



imimm^'' #### ##### ###" 

110BEAI)A,B,C 

120 wmm a$,a,b,c 

13OG0'r011O 

140 DATA 123. 4S, -34. 856 35. 7, 487. 34, -17, 1289. 990 
999 END 

EKMSPIM' 

■m ■ '11 ■ - ■*i289- 

0IJT 0F DATA m 110 



Decimal Fields 

The following rules apply to decimal fields: 

• A decimal field is a string of pound signs (#) with a decimal point either preceding, 
embedded, or terminating. 

• The numbjr jnn be r and trvincated to the number of places specified by the 
H- p6un3^igns foliowing the decimal point. 

• The number is right -justified, and the decimal point is placed as specified in the 
field definition. 

• When the number overflows the field, an asterisk is printed in the leftmost field 
position, and the field is widened to the right. 

• Eight digit accuracy is assured, with nine digit accuracy possible if all digits, 
excluding the decimal point, are less than 2427 (134217728). 

Example : 



100; ##f#^t# miMm #####. #.### 

110 READ A,B,C,D 

120 PRINT tJSING 1Q0,A,B,C,D 

ISO G0 T0 110 

lUmtA. 123.455, -84. 856^47. 7, 017? 
IgSDigCA 1^999,876.55,-17,20.893 

■ .;9t93EKD" 

-■':;-RiADy- 

■ in%4$' ' ' „-34. mm r \. ■ ' - ois 

;v : „ . 8^11.5500 -17» *20.893 
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Exponential Fields 

The following rules apply to exponential fields: 

© An exponential field is a decimal field followed by four up arrows, which re- 

serve a place for the exponent. 

© The pound signs preceding the period represent the factor by which the exponent will 
be adjusted. 

• The number will be rounded in the same manner as decimal fields. 

• At least one pound sign must precede the period. 

• The leftmost pound sign reserves a position for the sign of the number, minus if 
negative, blank if positive. 

Example : 



m- #.##### ' ##.### m m. 4Wf #.# 

XIORSAD A»1,C,1> 

120miNT USING 100,A»B,C,D, 

130 G0 T0 110 

140 DATA 123. 4S6, -34. 8S6, 47, 7, - . 0177 
ISO DATA 1.999, 876. 55,-17, . 893 
999 END 




READY 
RUN 






KXP0NENF - 

.imS6E+03 -3.486E+01 
.1&990E+01 S.7e5E+02 
0UT0F DATA MHO 


48.B+00 -.18; 
-17.1+00 .891 


E+00 



Dollar Sign Fields 

The following rules apply to dollar sign fields: 

• A dollar sign field is a string of dollar signs ($) followed by either an integer field or 
a decimal field. 

• Dollar signs may be placed only to the left of the decimal point. Dollar signs are 
equivalent to pound signs with the exception that a dollar sign will appear to the left 
of the numeric. 

• Only one dollar sign will be printed out. It will be floated to the right until either it 
is adjacent to the number, or the next position in the image is a decimal point. In 
the following example, the dollar sign in the first column does not float; the dollar 
sign in the second and third columns do float. 
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Example: 

lOO: $##,## $$$$.## $$$ 

120 PRINT USING 100,A,B,C 

130 €K2( T0 110 

1 50 DATA 13 . 13, 400. 16, 20. 2 

160 DATA 3. 13,40. 16, 2. 2 

170 DATA .13,. 16,, 2 

99&END 



READY 
RUN 

EXAMPLE! 

$13.13 $400.16 $20 

$ 3.13 $40.18 $2 

$ ,13 $.16 $0 
00T 0F DATA IN 110 



Alphanumeric Fields 

The following rules apply to alphanumeric fields: 

• The apostrophe is used to indicate the leftmost position of the field. 

• A continuation character is used to continue the field to the right. 

• Any one of the characters E, L, R, and C may be used to continue the field, but they 
may not be mixed in a single field. /j.ei' p 1 

Example: 

100: 'EEE 'hhhhU^hhhUjhhhh ' 'RRRRRRRR 

110 READ A$,B$, C$,D$, E$ 

120 PRINT USING 100, A$, B$, C$, D$, E$ 

130 DATA ABCDEFGHI, ABCDEF» ABC, ABC, ABC 

IBIHlllillliiiilliBliiB^ 
■llliilMiBMIillillllilili^Bill^ 

ABCDEFGHI ABCDEF A ABC 



Literal Fields 

A literal field is composed of characters or character strings that are not string variables or 
format control characters. It will appear on the print line exactly as it appears in the image. 
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Example: 



IGO: THE ¥AL0E F<2^H A IS $$$#.## 

1X0 LET A^llO. 54 

120 PRMT VSma 100, A 

99S mm 

BEADY 

Ml 

LITERALF 

THE VALUE F0E A IE $100, 54 



Functions and Statements 

Three functions were listed in Section 2 but not described. These are INT, SGN, and RND. 
Also there are twelve other functions that will sometimes be useful: TIM, CLK$, BCL, DAT$, 
IDA HPS, VPS, LIN, ASC, STR$, VAL, and LEN. 

Integer Function 

The INT function is the function which frequently appears in algebraic computation [x] , and it 
gives the greatest integer not greater than x. Thus INT(2.35) = 2, INT(-2.35) = -3, and 
INT(12)= 12. 

One use of the IN T f unctioj a js to round number s . We may use it to round to the nearest inte- 
ger by asking for INT (X + .5). This will round 2.9, for example, to 3, by finding, 



INT mT (3.4) - 3 



You should convince yourself that this will indeed do the rounding guaranteed (it will round a 
number midway between two integers up to the larger of the integers). 

It also can be used to round to any specific number of decimal places. For example, INT 
(10*X + . 5)/10 will round X correct to one decimal place, INT (100*X + . 5)/100 will round X 
correct to two decimal places, and INT (X*10 4 0+. 5)/10 | D will round X correct to D 
decimal places. 

Sign Function 

The function SGN (argument) yields +1, -1, or depending on the value of the argument. These 
are the options: 



Function 



Argument Value 



Yield 



SGN 
SGN 
SGN 



Zero 
Positive, not zero 
Negative, not zero 




+ 1 
-1 
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Examples: 



scaNr (0) y was 
S<M (-1.82) yields -1 
SGH<989) yields +1 

SGN (-0) yields 

NOTE: (-0) is not negative. 



END Function 

The function END produces a random number between (not including) and 1. No argument is 
required. For example you may type: 



If we want the first twenty random numbers, we write the program below and get twenty six- 
digit decimals. 

1OF0RL^1T02O 

20 wmm mm. 



mm 

RNDTES 



09:07 



0. 406S33 
0.863799 

a, mm 

5.00548E-2 



0.88445 
0.880238 
0. 897931 
0, 393226 



0.681969 
0.638811 
0. 628126 
0.680219 



0, 939462 
0, 602898 
0. 613262 
0, 682248 



0.253358 
0.990032 
0. 203217 
0. 668218 



On the other hand, if we want twenty random one-digit integers, we could change Line 20 to read 

^;PaOT I»TC10*H«P), 
and we would then obtain 



HSuDTES 

8 
S 




10;57 



8 
8 
8 
3 



6 
6 
6 



9 
6 
6 



2 
9 
2 
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We can vary the type of random number we get. For example, if we want 
ranging from 1 to 9 inclusive, we could change Line 20 as shown 



20 



random numbers 



20 PRnrr WT{9^KNI>+ 1); 
RIM ' 

HSDTES 10:53 










4 S 7 9 \8 8 8 6 6 9 8 i 


> 6 6 3 \ ' 


t 7 i 







or we can obtain random numbers which are the integers from 5 to 13 inclusive by changing 
Line 20 as in the example which follows: 



s n It u n n n lo i<i it i4 n w/w:[%^%^,%'mym:::^ ^ 

In general, if we want our random numbers to be chosen from the A integers of which B is the 
smallest, we would call for 



l^llllllllllliillB 
RAND0MIZE Statement 

The RAND0MIZE (or RAND0M) statement can be used in conjunction with the random number 
function to induce variance. It augments the function RND by causing it to produce different 
sets of random numbers. For example, if this is the first instruction in the program using 
random numbers, then repeated program execution will generally produce different results. 
When this instruction is omitted, the "standard list" of random numbers is obtained. 

It is suggested that a simulation model should be debugged without RAND0M, so that you always 
obtain the same random numbers for test runs. After your program is debugged, you may 
insert 



before starting execution runs. The abbreviated form RAN is permissible. 
TIM Function 

The TIM function provides the elapsed execution time in seconds. 
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Example : 



10 F0R X » 1 T0 5E5 
20 LET A = X 
30 NEXT X 

40 PRINT "ELAPSED TIME IS:"; TIM 
99 END 

^BlllllllSSii^SISI^Si 

EXAMP 17:27 
ELAPSED TIME IS: 14.95 



The execution time may be assigned a variable name. 
Example: 



10 F0R X « 1 T0 5E5 

20 LET A = X 

30 HEXT X 

40 LET B = TIM 

SO PRINT "ELAPSED TIME IS:"; B 
9& END 

I^JIIII^jlBllillllllllll 

EXAMP 15:04 
ELAPSED TIME IS: 14.95 



The execution times provided by the TIM function will not agree with the total time printed out 
at the end of a program run. This is so because TIM provides only execution time, but the total 
time includes compilation, execution, and termination times. 

CLK$ Function 

The CLK$ function provides the time of day, based on a 24-hour clock, as a string. 
Example : 



10 LET A$ = CLK$ 
20 PRINT A$ 
99 END 



This program will print the time of day in the form 

10:34XXX 
where XXX is the time zone. 

The CLK$ function may be printed without assigning it to a string variable. 
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Example: 



10 PRINT CLK$ 

will print out the time of day as a string, exactly as in the previous example. 
BCL Function 

The function BCL returns the time of day in hours and decimal fractions of hours based 
24-hour clock. 

Example : 

The following program sequence was executed at 11:02: 

10 LET A ^ BCL 
15 PEINT A 

The output returned was 
DAT$ Function 

The DAT$ function provides the calendar date as a string. 
Example : 

10LETA$-DAT$ 
20 PBIHT A$; 



will print the date in the form 

Like the CLK$ function, the DAT$ function need not be assigned to a string variable. 
Example : 

10 ^mm BAT$; 

lillilB^Bil^^ 

will also print the date, exactly as in the previous example. 



IDA Function 



The function IDA returns the date in integer form YYMMDD, where YY represents the last two 
digits of the year, MM represents two digits for the month, and DD represents two digits for 
the day. 

Example: 

The following program sequence was executed on 16 September 1970: 
The output returned was 



This reverse order is useful for sorting. 
HPS Function 

The form of the HPS function is 
HPS ( file designator ) 

and it gives the character position in the current line of the file being read or written, starting 
after the line number. 

Example : 
The program 



The character position when the HPS(O) statement was reached was 71. A zero file designator 
refers to the teletypewriter. 

The character position may be assigned a variable name. 





EUN 
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Example: 



40 LET B « M<0) 

60 PBINT "CHARACTEH I>(2feITI0^ 1S:";B 
sS'^mMm 17:36 



I 2 3 4 5 6 7 8 9 10 11 12 IS 14 15 16 17 18 19 20 
21 22 23 M 25 
CHAR&CTEKP0SITI0NIS: 20 



VPS Function 



The form of the VPS function is 



VPS ( file designator) 
and gives the current number of lines in a file that have been read or written. 



Example: 



The program 



lOHLESA 




20 SCOTCH #i 








40 WRITE #1,X 




50NEXTX 




60 LET N ^ y^il) 




W PRIST "It0. pF LINES IN A = 


IIIBIIIISlil^BBIlBIl^^ 


99EN» 





prints out 





110. 0FiaNISmA«6O 







LIN Function 

The iorm of the LIN function is 
LIN ( file designator ) 
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and provides the last line numlDer encountered in reading from or writing to a file. The value 
provided depends on the current mode ofthe^ile (READ OR WRITE). 



Example: 





10 FILES A 
20 SCRATCH #1 
3OF0RX«1T0 10 
40 WRITE 








































50 NEXT X 

60 ^RINT LIM(i) 

09 END 

































This program will print out the last line number written to file A: 



190 

The listing of File A 



A 




100 


1, 


110 


2, 


120 


3, 


130 


4, 


140 


5 , 


150 


6 , 


160 


7, 


170 


8, 


180 


9, 


190 


10, 



17:44 



verifies that the last line number in the file is 190. 

A variable may be assigned the value of the function LIN. 

Example: 



10 FILES A 
20 SCRATCH #1 
3OP0RX = IT06O 
40 WRITE #1,X 
50 NEXT X 
60LETA«UN{1) 
70 PRINT A; 














99 EJJD 















In this program, the variable named A is assigned the value of LIN(l). The program when run 
would produce the same results as the previous example. 
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ASC Function 



The form of the ASC function is 

ASC ( character ) or ASC ( abbreviation ) 

and it provides the numeric value of the specified ASCII character or abbreviation for nonprinting 
characters. 

Example : 

The program 



lOPRmt ASC(?) 




20 PRINT ASC{CE) 




30 PRINT ASC(LF) 




40 PRINT ASC(R) 




99 END 




will produce output of 


liiiilliliiM^^ 

















which are the numeric representations of the specified characters, ?, carriage return, line 
feed, and alphabetic character R. 

A variable may be assigned the value of the function ASC. 
Example : 



10 LET C = ASC(CR) 
20 PRINT C; 
99 END 




This program will assign the variable named C the numeric representation of the ASCII carriage 
return. The program when run will print out. 


liiiiiSiiB 





STR$ Function 

The STR$ function has the form 
STR$(N) 

where N is a number. The function produces a string corresponding to the value of the number 
N. 
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Example : 




The program 




10 INPUT N 

20 IMT X$ ^ STR${N) 

30 PRINT X$ 

iiiiiiilHBiH^^^^ 




will print out, if the value 12 is entered when input is requested, the string 







Example: 
The program 



10 INl>t?r X, Y 

20 IMT N = X*Y 

30 LET C| - ST^m 

40 mm "THE STRIHG C0imESi'0NDING T0 K IS:»; C$ 










produces the output 


^^■lilliliB^^HiiilllilBBiBiM^ 

THE STRING C0REESP0OT)ING T0 N IS: 700 









In this example the number N, computed by the program, is converted to a string. 



VAL Fimction 

The form of the VAL function is 
VAL(S$) 

where S$ is a proper number. This function produces a number corresponding to the value of 
the string represented by S$. This allows string variables to be used in arithmetic expressions. 

Example: 

The program 



10 LET A$ ="12" 
20 LET B » mL(A$) 
30LETQ=2*VAL(A$) 
40 FEINT Q; 
50 PRINT B; 
99ENI? 
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will give output of 



M 12 

for Q and B, respectively. 
Example : 



The program 





10 INPUT A$ 

20 UlT Z » ¥AL(i$) 







will produce, with the input 5E5, the corresponding number 



500000 



If the string does not represent a number, an error message is printed out. 



LEN Function 



The form of the LEN function is 



LEN(X$) 



where X$ is the name of any string. The function gives the number of characters in the speci- 
fied string. The value of LEN may be assigned to a variable or used directly. 

Example : 
The program 



10 RIAD A$, B$, C$ 
20 LET A I^N(A$) 
SO LST B LEN(B$} 
m iMT C « LEN(€$) 

50 PRMT ^*A| ^'<}A$r i:^NGTH 0F A$ «^*^;A 
60 PRIOT '^B$ «.^^;B$r LENGTH 0F B$ -*^;B 

mmsm ^*c| ^%c^f length 0f c$ ^^^;c 

80OATA ABG, BIFGH, m:yMtN0PQRST 
produces the output 



Example : 



The program 



' 10 HEAD A$, B$, C$ 


















40 mmr lin<c$> 






50 DATA ABC, mWG^ HUOKIMN 






^^^^^^^^^^^^^^^^^^^^^^^^^^ 





produces 

^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 
UN0$ Function 

The function UN0$ returns the 8-character user number of the current user. 
Example: 



100 LET A$=^mO$ 

110 IF A|^^^ABC99§9S" THEN 150 

120 mmT ^^TOU ABE SOT AUTHOMZED TO WE THB PROGEAM. 
mSTOF 

180 PRINT ^*YOU MAY USE THIS FROGHAM. 

999 wm 



If the current user number, returned by UN0S, is not ABC99999, the current user will not be 
allowed further access to the program. 

USE Function 

The function USE returns the current number of milli- computer resource units (CRU) for the 
current run. 

Example : 

In the following program sequence, a table of numbers, their squares, and their cubes will be 
printed for values 1 to 1000 unless 115 milli-CRUs are consumed before completion of the table. 

100 F0B. I « 1 T0 1000 
200 mi^T I, 1**2, i*n 
tmw XMEy 115 TEm 999 
400KKSrl 



When the program was executed, seven sets of values were printed before the program consumed 
the designated number of units. The program then stopped. 

40 



USE 



1148 mn 





SBIillPllilllllli 


lllillillllilllli 


■■■^^ 


ilili^Bilillllll 


ilMllllllliii 




lllllllliliililllBI 


27 




lliillllitlillllliilii 


64 




■■■■■■■■■■■■I 


125 
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216 




lllii^iiBiillBI 


343 



DEF Statement 

In addition to the standard functions, you can define other functions which you except to use a 
number of times in your program by use of a DEF statement. The name of the defined function 
must be three letters, the first two of which are FN. Hence, you may define up to 26 fimctions, 
e.g. , FNA, FNB, etc. 

If a fimction can be defined in a single line, it takes the following form: 



Later on you can call for various values of the fimction by FNE(. 1), FNE(3. 45), FNE(A + 2), 
etc. Such a definition can be a great labor saver when you want values of some fimction for a 
number of different values of the variable. 

Each function may have zero, one, two, or more variables, providing the definition fits on one 
line . For example , we may type 



DEF FI?C(X,T,Z,W) - FNB(X,Y)/FNB(Z;,W} 



The DEF statement may occur anywhere in the program, and the expression to the right of the 
equal sign may be any formula which can ge fitted onto one line. It may include any combination 
of other functions, including ones defined by different DEF statements, and it can involve other 
variables besides the one denoting the argument of the fimction. Thus, assuming FNR is defined 
by 

to DEF mmiX) - SQE (2 + LOG (X) ^ EXF {Yfn * (X ^ SIN (2*Z))) 

if you have previously assigned values to Y and Z, you can ask for FNR (2. 175). You can give 
new values to Y and Z before the next use of FNR. 

If a function requires more than one line for its definition, introduce the fimction with a DEF 
statement containing no = and end the definition with a statement FNEND. For example; 
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30IFT«XTHEN50 



The function will assume the last value assigned to the function name, i.e. , Lines 20 or 40. 

Multiple line DEF's may not be nested, and there must not be a transfer from inside the DEF 
to outside its range, nor vice-versa. 

Variables other than the arguments can be used and assigned values in multistatement functions 
These variables may be global, which means that they can be used both inside and outside the 
fxmction definition on either side of the equals sign; or they may be local, which means they are 
defined only within the fimction definition. Normally they are global. To specify a variable as 
being local, list the variable name in the DEF statement following the function name and argu- 
ments, for example. 



P and Q are specified as local variables , and bear no relation to P or Q used outside of the func- 
tion definition. 



G0SUB and RETURN Statements 

When a particular part of a program is to be performed more than one time, or possibly at 
several different places in the over-all program, it is most efficiently programmed as a sub- 
routine. The subroutine is entered with a G0SUB statement, where the number is the line 
number of the first statement in the subroutine . For example , 



m G0BVB 200 



directs the system to Line 200, the first line of the subroutine. The last line of the subroutine 
should be a RETURN statement directing the system to return to the earlier part of the program. 
For example. 



will tell the system to go back to the first line numbered greater than 80 and to continue the pro- 
gram there . 
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The following example, a program for determining the greatest common divisor (GCD) of three 
integers using the Euclidean Algorithm, illustrates the use of a subroutine. The first two num- 
bers are selected in Lines 30 and 40, and their GCD is determined in the subroutine, Lines 200- 
310. The GCD just found is called X in Line 60, the third number is called Y in Line 70, and 
the subroutine is entered from Line 80 to find the GCD of these two numbers. This number is, 
or course, the greatest common divisor of the three given numbers and is printed out with them 
in Line 90. 



You may use a G0SUB inside a subroutine to perform yet another subroutine. This would be 
called "nested G0SUBs. " In any case, it is absolutely necessary that a subroutine be left only 
with a RETURN statement; using a G0T0' or an IF-THEN to get out of a subroutine will not work 
properly. You may have several RETURNS in the subroutine. The first RETURN statement 
executed in a subroutine causes a return to the earlier part of the program. 



You must be very careful not to write a program in which a G0SUB appears inside a subroutine 
which refers to one of the subroutines already entered, (Recursion is not allowed! ) 



10 PRMT " A", " '» C", »' GCD" 

20READ A,B,C 

30 LET X -A 

40 LET Y *B 

SO G0 SUB 200 

60 LST X=G 

70 LET YaC 

80 00 StfB 200 

aoPRINT A,B,C,G 

100 G0 T0 20 

110 DATA 80,$0, 120 

120 DATA 38450, 648'?2, 98765 

130 DATA 32,384,72 

200 LET Q»nprac/Y) 

210 LET R»X-Q*Y 
22OlFa^C^T0SOO 

iHiiMii^llililBlllill 

240 LET Y«R 
250 G0 T0 200 
300 XJET ChsY 

mmTxsm 
320 wm 

READY 



RUN 



GCN3N0 


09:14 














■■■■■■■I 


B 


■■■■iHlillll 


GOO 


60 


90 


120 


30 


38456 


64872 


98765 


■iiiliii 


32 


384 


72 


8 


0m'0FDA^A 


m2Q 







43 



0N Statement 



The IF . . . THEN statement discussed in Section 2 allows a two-way conditional switch in a 
program. The 0N statement provides a multiple switch. For example, consider the following: 

0H X O0 T0 100, 200, 150 



If X = 1 the program branches to line number 100. 
If X = 2 it goes to line 200. 
If X = 3 it goes to line 150. 

Any formula may replace X and there may be any number of line numbers in the instruction 
providing it fits on one line. The value of the formula is computed and its integer part taken. 
If this equals 1, the program transfers to the first specified number on the list. 

If the integer part equals 2, the program transfers to the second number, and so forth. If the 
integer part is less than 1 or larger than the number of line numbers specified, an error 
message is printed. 



Note the use of 0N - G0 T0 in line 120 of the following example: 



1OOIFX>O<30T0MO 


110 F6R T0 3 


120 0N X G0 T0 200, 300, 400 


200 PRINT 200 




21O(30T0iOO 




300 PRINT 300 


31OG0T0 5OO 


400 PRINT 400 


SOONEXTX 




600 ST0P 




900 END 




EEADY 




RUN 




0[TG0T0 




200 
300 




400 





INPUT Statement 



There are times when it is desirable to have data entered during running of a program. This 
is particularly true when one person writes the program and enters it into memory, and othei 
persons are to supply the data. This may be done by an INPUT statement, which acts as a 
READ statement but does not draw numbers from a DATA statement. If, for example, you 
want the user to supply values for X and Y into a program, you will type 



40 INPUT X,Y 
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before the first statement which is to use either of these numbers. When it encounters this 
statement, the system will type a question mark. The user types two numbers, separated by a 
comma, presses the return key, and the system goes on with the rest of the program. 

Frequently an INPUT statement is combined with a PRINT statement to make sure that the user 
knows what values to put in. You might type 





20 Vmm "WHAT ARE Y0im VALUES 0F X, Y» AND Z": , 
30IHPIjTX,Y,Z 

^■■■■■■i^aiiiiiiiiiiis 









and the system will type 





WEAT! ABE Y0UE VAWES 0F X, Y, and Z ? 













Without the semicolon at the end of Line 20, the question mark would have been printed on the 
next line. 

Data entered via an INPUT statement is not saved with the program. Furthermore, it may take 
a long time to enter a large amount of data using INPUT. Therefore, INPUT should be used 
only when small amounts of data are to be entered, or when it is necessary to enter data during 
the running of the program such as with game -playing programs. 



CHAIN Statement 

The CHAIN statement allows the user to stop execution of the current program and begin com- 
pilation and execution of another program without intervention. It has the same effect as giving 
the commands ST0P, 0LD, a program name, and RUN. The form of the statement is 

CHAIN ^ ^new file name ^^ or CHAIN X$ 

The name of the file to be accessed must be enclosed in quotation marks unless it is a string 
variable. The file containing the CHAIN statement and the file to be accessed must be saved 
files. 



Example : 




In this example, the program BARBl chains to the program BARB2. If BARBl, the current 
file, had not been saved, the error message 
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CmEEHI? WUM MUST BE SAVED BEF0HE CHAM CAH BE FEBF0RMEI> 



would have been transmitted to your terminal. If the file BARB2, to which you were chaining, 
had not been saved, the error message 

mm K0T SAVED 



would have been transmitted to your terminal, and the copy of BARBl in working storage would 
be scratched. As a result, it is advisable to save all files containing CHAIN statements prior to 
execution to avoid loss of the file. 

In the preceding example, when the system encounters Statement 10 in the program BARBl, it 
will transfer BARBl out of working storage, and load and execute BARB2. The user must call 
BARBl again if he wishes to make corrections or additions to that file. 

The CHAIN statement, combined with the statements that permit reading from and writing to 
files, provides greate flexibility with respect to program size. If the program BARB and its 
associated data exceeded the working storage size, BARB can be divided into two programs, 
BARBl and BARB2. Thses two programs, each about half the size of BARB, can be executed 
in sequence by using the CHAIN statement. However, the CHAI N statement does one thing and 
onlg one thing-- it takes BARBl out of working storage, puts BARB? into woWi^^^ 
executes BARB2. It does not allow the user to chain to a specific line of a file, nor does it save 
the values of variables in BARBl for later use by BARB2. This can be overcome by the use of 
files. Any program variables generated, manipulated, or otherwise provided by BARB2 and 
needed by BARB2 can be written to a file, for example BARBF, by BARBl and read from the 
same file by BARB2. 

Example: 

NEW 0E 0M>-' ^U> BAHBl 
10 FILES BAEBf 

^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 
(I>R0GEAM STATEMENTS) 



50OSCBATCH #1 
600 WRITE «,V1,V2,V3 
*?00 CHAM ^^BARB2" 
999 Em 



The program BARB2 would contain the following statements: 



10 iO FILES SAiab* : 






20EEAD«l,Vl,V2,V8 ' ' 
















lliiiiiiiHiili^BB 






^MfS^^^h v^^^^'^Mm 0E WRITE REsui;rs) 













ST0P Statement 



ST0P is equivalent to G0T0 xxxxx, where xxxxx is the line number of the END statement in the 
program. It is useful in programs having more than one natural finishing point. For example, 
the following two program portions are exactly equivalent. 



REM Statement 

REM provides a means for inserting explanatory remarks in a program. The system completely 
ignores the remainder of that line, allowing the programmer to follow the REM with directions 
for using the program, with identifications of the parts of a long program, or with anything else 
that he wants. Although what follows REM is ignored, its line number may be used in a G0SUB, 
IF-THEN, G0 T0, or 0N-G0 T0 statement. 

tm EBM wmm i>mkm limes 900-998. the first 

mREMNtJ»mERISm/TES NtaffiER0FF(2ftHTS. THEN 
^ T 120<BEM THl^DATA'10IOTp TBSWLVES ARE EUiTERED, BY 

iiSlillB^ii WiiiiPiiiiliiB^^i^Piiiilililiiii^^ 



Explanatory remarks may be located following a statement on a line, by using the character 
" ' '\ Anything on the line following the ' " will be treated as an explanatory remark. For 
example, the statement 



includes the remark INITIALIZE Y TO ONE without affecting the running of the program. 



REST0RE Statement 

Sometimes it is necessary to use the data in a program more than once. The REST0RE state- 
ment permits reading the data as many additional times as it is used. Whenever REST0RE is 
encountered in a program, the system restores the data block pointer to the first number. A 
subsequent READ statement will then start reading the data all over again. A word of warning— 
if the desired data is preceded by code numbers or parameters, superfluous READ statements 
should be used to pass over these numbers. As an example, the following program portion 
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reads the data, restores the data block to its original state, and reads the data again. Note the 
use of line 570 to "pass over" the value of N, which is already known. 



lOOElADH 

110 F0R I » 1 T0 N 

120RBADX 

56OBigT0HE 

58OF0EI^1T0N 
590 READ X 



TRACE 0N, TRACE 0FF Statements 

TRACE 0N and TRACE 0FF statements may be useful in debugging programs. The TRACE 0N 
statement causes the line number of each subsequent statement that is executed to be printed 
out. The TRACE 0FF statement causes the printing out of line numbers to stop. 



Example : 



26 f EACl 0H 

30 LET A « X+<Y*Z) 

50 HBEINT " A N0T ZER0" 
60 (30 2*0 10 
88 »ATA -9,3,4,-12,3,4 
M TBACE 0FF 
100 END 

mm 

TRC 18:41 

*AT 30 
*A'I' 40 
*AT SO 

A!?0T ZER0 
*AT 60 
*AT 30 
*AT40 
*AT 99 



TRACE 0N may be used without TRACE 0FF. 
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Example : 



20 TRACE m 

30 LET A « X+(Y*Z) 

40 IF A = THEN 99 

SO PRINT " A N0T ZER0" 

6O<50T01O 

88 DATA -9,3,4,-12,3,4 

991ND 






TRC 18:42 




*AT 30 
mT 40 
*AT 50 

A ZER0 
*AT 60 
*AT 30 
*AT 40 
*AT 99 




Matrices 



Although you can work out for yourself programs which involve matrix computations, there is 
a special set of statements for such computations. These statements must start with the word 
MAT. They are 



MAT READ A,B,C,.. 

MAT PRINT A,B;C,. 

MAT B = A 
MAT C = A + B 

MAT C = A - B 

MAT C = A * B 

MAT C = INV (A) 
MAT C = TRN (A) 
MAT C = (K) * A 

MAT C = CON 



Read the matrices A,B,C, . . . . , their dimensions having 
been previously specified. Data is read in row -wise sequence. 

Print the matrices A,B,C, . . . , with A and C in the regular 
format, but B closely packed. 

Set the matrix B equal to the matrix A. 

Add the two matrices A and B and store the result in matrix 
C. 

Subtract the matrix B from the matrix A and store the result 
in matrix C. 

Multiply the matrix A by the matrix B and store the result in 
Matrix C. 

Invert the matrix A and store resulting matrix in C. 

Transpose the matrix A and store the resulting matrix in C. 

Multiply the matrix A by the value represented by K. K may 
be either a number or an expression, but in either case it 
must be enclosed in parentheses. 



Each element of matrix C is set to one. 
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MAT C = ZER 



Each element of Matrix C is set to zero. 



MAT C = IDN The diagonal elements of matrix C are set to one's yielding an 

identity matrix. 

MAT INPUT V The input of a vector is called in. 

Special rules apply to the dimensioning of matrices which occur in MAT instructions. DIM 
statements indicate that the maximum dimension of a matrix is to be. Thus, if we write 




then M may have up to 20 rows and up to 35 columns. If a matrix reference occurs without a 
DIM statement, a 10x10 matrix is established. 

The actual dimension of a matrix may be determined either when it is first set up, or when it is 
computed. For example. 













reads a matrix M of the dimension previously declared in a DIM statement. On the other hand, 


- , 'MAT mm Miit,^) " 











reads a 17x3 matrix providing sufficient space has been saved for it. 

Four of the MAT statements explicitly accomplish redimensioning: 

MAT READ C (M,N) 
MAT C = ZER (M,N) 
MAT C = C0N (M,N) 
MAT C = IDN (N,N) 



The first three statements would specify matrix C as consisting of M rows and N columns. The 
fourth statement would specify matrix C as a square matrix of N rows and N columns. These 
same instructions may be used to redimension a matrix during running. A matrix may be re- 
dimensioned to either a larger or a smaller matrix provided the new dimensions do not require 
more space than was originally reserved by the DIM statement. It is not possible to redimen- 
sion a matrix within a multiline defined function. To illustrate, assume the following statements 
exist: 




t. 

I 



From these statements observe that the DIM statement reserves sufficient storage to accom- 
modate three matrices, each consisting of 64 elements. The initial MAT READ specifies the 
dimensions of both matrices A and B as two rows and two columns. The MAT READ also reads 
the number of values required by the dimensions into the storage which was reserved by the DIM 
statement. The MAT READ reads the values in row -wise sequence. In the initial MAT READ, 
the elements in order read are A(l,l), A(l,2), A(2,l), A(2,2), B(l,l) B(l,2), B(2,l)and 
B(2,2). (Matrix statements use 1 to n subscripting, not to n. ) 

Statement 60 illustrates the use of ZER to specify dimensions and to zero the elements of the 
matrix C. Statements 100 and 110 illustrate redimensioning: Matrix A is redimensioned as 
an eight-row, eight-column identity matrix, and matrices B and C are redimensioned as four- 
row, four-column matrices into which data is to be read. 

While the combination of ordinary BASIC instructions and MAT instructions makes the language 
much more powerful, you must be very careful about dimensions. In addition to having both a 
DIM statement and a declaration of current dimension, you must be careful with the MAT state- 
ments. For example, a matrix product MAT C = A * B may be illegal for one of two reasons: 
A and B may have dimensions such that the product is not defined, or even if it is defined, 
C may not have reserved enough space for the answer. In either case, a DIMENSI0N ERR0R 
message results. 

Matrices consisting of a single row or single column of elements, i.e. , vectors, are per- 
missible in MAT instructions. As is true with all other matrices, the dimensions for such 
matrices should be explicitly stated before use in a MAT instruction. Thus, 





10D1MA(3,1), B(S,3), C{8,1) 

20 MAT C« ZEE (3, X) 

30 MAT EEAD A(8,l), B{5,8) 

70 MAT C » B*A 













illustrates the requirements for multiplying a (3x3) matrix by a (3x1) matrix (vector). Column 
vectors should always be considered as (nxl) matrices, and row vectors must always be con- 
sidered as (Ixn) matrices. 

The same matrix may occur on both sides of a MAT equation in case of replacement, addition, 
subtraction, or constant multiplication; but not in any of the other instructions. Legal forms 
are 



MAT A = B 
MAT A = A + B 
MAT A = (2.5)*A 
MAT A = A - B 



Illegal forms are 



MAT A = B*A 
MAT A = INV (A) 
MAT A = TRN (A) 
MAT A = A + B - C 



51 



The last example is an attempt to use more than one matrix operator in a MAT statement. Two 
MAT statements must be used to do two matrix operations. 



The determinant of a matrix can be obtained by first inverting the matrix, and then using DET. 
For example, 





MAT B ^ mV (A) 
LET « DET 























The determinant of A is stored in D. You may decide whether the determinant was large enough 
for the inverse to be meaningful. 



Attempting to invert a singular matrix does not cause the program to stop, but DET is set equal 
to zero. 

Two programs follow which illustrate some of the capabilities of the MAT instructions. In the 
first example, the values for M and N are read. Using these values as indexes. Statement 30 
sets the dimensions for matrices A, B, D, and G, respectively. Also, the values for the 
elements of these matrices are read. In sequence then, the dimensions of matrix C are specified 
and the elements set to zero (Statement 40). Matrix A is printed (Statement 60); matrix B is 
printed (Statement 80). The sum of matrices A and B is found and stored in C (Statement 90). 
Matrix C is printed (Statement 110). The dimensions for matrix F (a vector) are set and the 
elements set to zero (Statement 120). The product of matrices C and D is computed and stored 
in F (Statement 130). The dimensions for matrix H (single value) are specified, and the elements 
set to zero (Statement 140). Finally the product of matrices G and F is found and stored in H and 
printed (Statements 150, 170). 

In tne second example, a value N is read which determines the order of the Hilbert matrix seg- 
ment to be computed, stored, and printed. Next this matrix is inverted and printed. Finally 
the Hilbert matrix is multiplied by its own inverse, and the resulting product matrix is printed. 
Notice that in the example N = 2 then N = 3 is run, demonstrating the ability to redimension 
larger during running. 

BASICT 10:4S 

18 MM S), B(8, S), C(5, 5),D(5, 5), E{5, 5), F(5, 5), G{5, 5), H{5, 5) 
20 HEAD M^H 

30 MAT nkm AiM^ M),B{M, M), D(M, N), G(H, M) 

40MATC- ZEEWlyl) 

50 PRINT ^lilATRiX A 0F 0RD1R m 

m MAT PEINT A; 

70 PRINT '^mATRm B 0F 0RDEE m 
80 MAT PKB«T B; 

90MATC« A*fB 
100 PRINT 0-A¥W' 
110 MAT PEOIir C; 
115 PRIHT 

120 MAT F«2EB{M,H) 

ISO MAT cm 

140MATH^ZEIR(N,N) 

150 MAT il-O^F 

160 PRINT W 

170 MAT PRINT H; ; 

1800 DATA 3 1 

1810 DATA ll 2, S, 4, 0, 7, 8, 9, 9, 8, % 6, 5, 4, 3, 2, 1, 1, 2, 3, 3, 2, 1 
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READY 



RUN 

BASlCr 10t46 



MATRIX A 0F0RDER 3 

■■■■■■■■^Sll 

4 5 6 
7 8 9 

MATRIX B 0F 0RI>SR 3 

5 4 
3 2 1 
C=A+B 



10 


16 


10 


10 


10 


10 


10 


10 


10 



H 



HILTST 11:01 



10 DIM A(20, 2O),B<20, 20), C(20, 20) 

20 READ N 

30MAT A^C0N(N,N) 

40 MAT B »C0N(N, N) 

45MATC^C0N(N,N) 

50 F0R I»l T0 N 

60 F0R J=l T0 N 

70 LET A{I,jr)^l/(I+J~i) 

80 mXT J 

90 NEXT I 

93 PRINT " BILBERT MATRIX 0F 0RDER "N 

95 MAT PRINT A 

97 PRINT 

100 MAT B=INV(A) 

105 PRINT " INVERSE 0F HELBERT MATRDC 0F 0RDBR "N 

110 MAT PRINT B 

112 PRINT 

115 MAT C=A*B 

117 PRINT «HILB1RT MATRIX HMES ITS 0WN INVERSE 0RDER "N 

118 MAT PRINT C 

119 PRINT 

120 G0 1^ 20 
190 DATA 2, 3 
1999 END 

READY 
RUN 



IIBB^BIIIIIlllBIIHHiB^^HBIIH^^BIM 


HUBERT MATRIX 0RDER 2 






■■■lllllllBII^BHllllHili^H 




0.5 0.333333 




INVERSE 0F HILBERT MATRIX 0RDER 


illlSil^Bi^Bill^^^HiHi 


IIBilllllillHIIIi^BIIIH^^ 








HILBERT MATRIX TIMES rrS 0WN INVERSE 0SbER 2 


■■■■■Illlllillll^lS 


7.45058 E-9 1. 


HILBEET MATRIX 0F 0RDER 3 





1 0.5 0.333333 

0.5 0.333333 0.25 

0,333333 0.25 0.2 

INVERSE 0P HILBEKT MATRIX 0F 0RDER 3 



9. -36. 30. 

-36. 192, -180. 

30. -180. 180. 

HILBEET MATRIX TIMES ITS 0WN INVERSE 0RDER 8 

1 . 5. 41409 E-7 -1 . 57456 E-6 

-2,33452 E-7 1. -7,6t893 E-7 





-1.92473 E-7 1.78814 E-7 
0OT0FDATAIN2O 


0.999999 










The statement 



MAT INPUT V 

will call for the input of a vector. The number of components in the vector need not be specified. 
Normally the input is limited by having to be typed on one line. However if you end the line of 
input with & (before carriage return), the machine will ask for more input on the next line. Note 
that, although the number of components need not be specified, if we wish to put in more than 10 
numbers, we must save sufficient space with a DIM statement. After the input NUM will equal 
the number of components, and V(l), V(2), . . . , V(NUM) will be the numbers entered. This 
allows variable length input. For example, 

■■■■■■■■■■■■■■■■IH 

lOMATMPUTV 
20 LET N » NUM 
80 IF N«0 THEN 99 
4OFORI-XT0N 
45 i,ET S »^ S + V(I) 
■lililMSiBillllllllli^ll^iliBliilH^^ 
60 PRINT S/N 
70 <^ T0 5 
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allows the user to type in sets of numbers, which are averaged. The program takes advantage 
of the fact that zero numbers may be put in, and uses this as a signal to stop. Thus, the user 
can stop by simply pushing '^carriage return" on an input request. 

Alphanumeric Data and String Variables 

Alphanumeric data, names, and other identifying information can now be handled in the BASIC 
language using string variables. You can input, store, compare and output alphanumeric and 
certain special characters. 

A STRING is any sequence of alphanumeric and certain special characters not used for control 
purposes in the system. 

STRING SIZE is limited to 119 valid characters. 

Any variable followed by a "$^' represents a string. For example: A$, B$. A subscripted 
string variable refers to a particular string in a list of strings. For instance, B$(4) would refer 
to the fourth string in the B$ list. 

Let's consider the BASIC statements where strings can be used. 
DIM Statement 

Strings can be set up as one-dimensional lists only. Requests for two-dimensional lists are not 
allowed. 

Examples: 



In Statement 10, only C$ and A$ are string variables. R$, as dimensioned in Statement 20, 
will set aside space in memory for 35, 119 character lists. Any or all of these strings may be 
less than 119 characters. 



LET Statement 

Strings and string variables may appear in only two forms of the LET statement. The first is 
used to replace a string variable with the contents of another string variable: 

Example: 



and the second is used to assign a string variable: 



Example: 



Arithmetic operations may not be performed on string variables. Requests for addition, sub- 
traction, multiplication, or division involving string variables produce an error message. 



IF-THEN Statement 

Only one string variable is allowed on each side of the IF-THEN relation. All of the six 
standard relations (=,<>,<,>,<=,>=) are valid. When strings of different lengths are compared, 
the shorter string is filled with blanks so that it is the same length as the other string, then the 
comparison is made. 

Examples: 



100 IF N$ = ''rniTW' THEN 105 
200 IF A|<>B$ mm 205 
300 IF ^OTNE"<-M$ THEN 305 
400 IF 1>$>-^*FRIDAY^^ THEN 600 



CHANGE Statement 

The CHANGE statement is used to convert string characters into numerical "code** characters 
or the reverse. Refer to Publication Number 711223 (Command and Edit Systems) for the 
decimal codes for each printing and non-printing character. 

In the following example the instruction CHANGE A$ TO A in Line 30 has caused the vector A 
to have as its zero component the number of characters in the string A$ and to have code num- 
bers in the other components. 



10 A{85) 

20 HEAD A| 

30 CHANGE A$ TO A 

40 F0E I = TO A(0) 

50 PnmT Ail); 

60 NiXT I 

70 DATA ABCUSf OHUKLMNOPQHSTUVWXyZ 
80 END 



READY 

CEAKGE 11:38 



26 6S 66 67 68 60 70 71 72 73 74 7i 76 77 78 79 80 81 
82 88 84 85 86 87 88 89 90 



To reverse the process and convert code characters to string characters, you must specify a 
value for the zero component. The value should be equal to the number of stored code characters 
you want to convert. 

The following example reverses the process of the previous program. Note that the zero com- 
ponent is given the value 26 by Line 50. 
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10DMA(26) 

20 W0R I a J T0 26 

30 LET A(D = 64+1 

40 NEXT ! 

50 LET A(0) « 26 

60 CHANGE A TO Af 

70 PEMT A$ 

99 mm 















The preceding program will produce the string 



ABCDEFGHIJKIiMN^PQHSTtJVWXYZ 
DATA, INPUT, and MAT INPUT Statements 

In the DATA statements, numbers and strings may be intermixed. Numbers will be assigned 
only to numerical variables, and strings only to string variables. Strings in DATA statements 
are recognized by the fact that they start with a letter. If a string does not start with a letter, 
or contains a comma, it must be enclosed in quotes. For example. 



90 DATA 10, ABC, 5, 'HFG'\ ^'SJEIPT,22, 1967", 2 



The only convention on INPUT is that a string containing a comma must be enclosed in quotes. 

With a MAT INPUT, a string containing a comma or an ampersand must be enclosed in quotes. 
For example: 



"MR. 


& ism. SMfTH", MR. JONES 









































is the correct format for a response to a MAT INPUT A$. 

In any of the three ways of getting string information into a program - DATA, INPUT, or 
MAT INPUT - leading blanks are ignored unless the string, including the blanks, is enclosed 
in quotes. 



If in doubt use quotes; they will not cause any errors. 




READ and PRINT Statements 



Strings may be read and printed in the usual manner. For example. 



10 HEAD A$, B$, C$ 
20 FROsTT C$; B$; A$ 
30DATA1NG, SHAE^ TME- 
40 Em 



wUl print the word "TIME -SHARING. »V Note that the effect of in the print statement is con- 
sistent with that discussed in the section on PRINT; that is, with alphanumeric output the 



semicolon causes close packing whether that output is in quotes or is a string variable. (In con- 
trast, recall that with numeric output the semicolon causes space to be left between the numbers 
printed.) Commas and TAB's may be used as in any other PRINT statement. The loop 



will read a list of 12 strings. In place of the READ and PRINT, the corresponding MAT instruc- 
tions may be used for lists. For example, MAT PRINT M$; will cause the elements of the list 
to be printed without spaces between them. 

As usual, lists are assumed to have no more than 10 elements; otherwise, a DIM statement is 
required. 

Note: Nimieric and string data are kept in two separate blocks, which act independently of each 
other. The command RESTORE will restore both numeric and string data. RESTORE* will re- 
store only the mmieric data. RESTORE$ will restore only the string data. 

Data Files 

Data files may be used with MARK II BASIC language. These files, (if ASCH), may be created 
at your terminal, transmitted to the system, saved, listed, and edited. An extensive set of 
editing commands for use with files is described in the Command and Edit Systems Reference 
Manual, publication number 711223. 

Under program control you may read data from files or write data to files for subsequent use by 
the same or other programs. The file types, access capabilities, methods of creating and using 
files, and file manipulation capabilities are examined in the following paragraphs. 

File Types 

Files are classified by type— internal or external, ASCII* or binary. 

An internal file is contained in the program which processes that file. Use of the READ and 
DATA statements, described in Section 2, are examples of reading data from an internal file. 
Use of the PRINT statement to create terminal output may be thought of as writing data to an 
internal file. 

An external file is not contained in the program which processes that file but rather is a file 
saved in your catalog for subsequent use by another program. 

An ASCII file contains data which is stored as a series of ASCII character codes. For example, 
the word READ is stored as the four character codes for R, E, A and D. 

A binary file contains data which is stored as a series of binary-coded representations of that 
data. For example, the letter R is stored as 1010010. 

Internal files must be ASCII files- External files may be either ASCH or binary. 



*ASCII refers to the set of standard character codes established by the American National 
Standard Code for Information Exchange. 
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File Access Capabilities 



Files may be accessed either sequentially or randomly. A file is referred to as sequential 
when access to any specific data element in the file is gained only by reading the file from the 
beginning through to that data element. A file is referred to as random when you have selective 
access to any data element in the file without reading through the file from the beginning to that 
data element. 

Only sequential access is available for ASCII files. Binary files may employ either sequential 
access or random access. 

Initial File Preparation 

A data file must be created and saved in your catalog prior to execution of the program which 
processes or uses that file. 

ASCII Files 

If a file of data input is to be used with the executing program, it must be prepared and saved 
prior to execution. The word DATA is not required; simply type a line number, followed by the 
input data, separated (delimited) by the comma (,). Although the comma is the standard 
delimiter, you may specify a nonstandard delimiter with the DELIMIT statement (described 
later in this section). 



Example: 






10 23 
20 32 
30 34 


,4S»67,78,65,23,12 
,45» 67, 78, 34, 12, 12, 34 
,56,78,28,56,76, 











If the file is to be written during program execution, you must create and save the file prior to 
program execution. To create a file for this purpose, refer to the system command CREATE 
in the Command System Reference Manual, publication number 711223. 

You may use all of the editing commands to access, list, and modify ASCII files. 
Binary Files 

To establish a binary file, you may use the CREATE command. To establish a binary random 
file, you must use the CREATE command to specify the length of each record and the number 
of records in the file. 

Data may be placed in a binary file only under program control. Only a running program can 
access and modify a binary file. You can obtain information about the file, e. g. , file type, 
length, by using the DESCRIBE command. 

File Classification 

A sequential file is classified as binary or ASCH by the format of the first WRITE statement 
after the file is scratched. Once a file is so classified, all subsequent statements referring to 
it must be consistent with that classification imtil the file once again is scratched. 

It is important to emphasize that the distinction between binary sequential and ASCII sequential 
is made solely by the nature of program statements referring to that file. K you refer to a 
binary sequential file with a statement whose format is appropriate to ASCII sequential file, the 
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run will be aborted and you will receive an error message. The file, however, will remain 
intact. 

If you wish to reclassify a file, you must 

• Scratch the file with a SCRATCH statement which conforms to the format appropriate 
to the filers current classification. 

• Use a WRITE statement which conforms to the format appropriate to the new classifi- 



File Reference 

Before files can be used in a program, their names must be specified in a file reference state- 
ment. Valid forms of the statement are 

FILES name 1 ; name 2 ;. . . ; name n or FILES name 1 , password 1 ;. . . ; name n , password n 

The file reference statement opens the named files. You can reference as many as eight files at 
the same time in any program. If you reference more than eight, you will receive the error 
message TOO MANY FILES. 

Multiple FILES statements are permitted as long as the total nu mber of files open at one time 
does not exceedeight. — r-«.,«.«««»^ 



F^l^^in|jmust conform to the conventions for naming programs, except for these additional 
reslricuras: 

• File names must n ot contain semicolons; they are interpreted as file separators. 

• File names should not contain flashes (/), commas, or colons. 



• Leading spaces are ignored. 

• File names may not appear more than once in the same FILES reference statement. 

An asterisk may be used in place of the file name in the FILES reference statement so that the 
file may be designated at a later time with a FILE statement. The file used to replace the * 
referenced file must already be saved in the same catalog. The * referenced file must be re- 
placed with a saved file before the file can be referenced. 

An example of the use of * referenced files appears with the description of the FILE statement. 



File Designator 

The file designator is a numeric argument used in all file input and output statements. It selects 
the file from the FILES reference statement to be used for the current operation. 

For ASCII files the file designator is preceded by a poxmd sign (#). For binary files it is pre- 
ceded by a colon. The file designator may be an integer, variable, subscripted variable, or an 
arithmetic expression. 



cation. 
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Example 



For ASCII files 
10 FILES A;B;C;D 



For binary files 
10 FILES A;B;C;D 



20 READ #1,X 



20 READ: 1,X 



30 READ #F,Y 



30 READ: F,Y 



40 READ #H(I),Z 



40 READ : H(I), Z 



50 READ #M*N, T 



50 READ : M*N, T 



In Statements 30, 40, and 50 above, the value of the designator specifies the file to be used. For 
example, if the value of F in Statement 30 is 2, a data item is read from file B. 

If the value of a variable, subscripted variable, or arithmetic expression used as a file designator 
is not an integer, the value is truncated to an integer and used as the designator. 



FILE Statement 

The identification of a file by a particular file designator may be changed within a program by 
the use of the FILE statement. Valid forms of the statement are 

For ASCII files For binary files 

FILE #file designator , "file name" FILE : file designator , "file name" 

FILE # file designator : "file name" FILE: file designator: "file name" 

FILE #file designator , "file name, password" FILE : file designator, "file name , password " 

FILE #file designator : " file name, password FILE: file designator : " file name, password" 

The file name used in a FILE statement may be a regxilar file name enclosed in quotation marks, 
an asterisk enclosed in quotation marks, or a string variable which may be subscripted. The 
asterisk closes the designated file and invalidates the associated file designator, which may again 
be validated by a subsequent FILE statement in the same program. 
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Example: 



100 Fmm AHLE, APASS;BFILE;*;DFILE 

110 A$«^^CFILE,CPASS 

12QREA1>#1,A^B. 

125 f ILl #1, 

130 FILE #3, A$ 

140BE*&#S,C,I> 

152mEA©#|,E,F 
155 FILE #2/**^* 
160 FIi:,!**,^^^'^ 
msCHAfCMfS 
ISO sea AtCM #4 
mW»ITE#3,A,B 
200 WR|f E #4, C, E, F 
1M> 



A file is opened when its name appears in a FILES reference statement or replaces another file 
name or an * with a FILE statement. The FILE statement in Line 130 opens the file CFILE. In 
effect, the FILES reference statement in Line 100 has become 



100 fILlS ^jBFILEjCFlLE.CPASSjDFILE 



A file which has been opened may not be opened again with a FILES reference statement or a 
FILE statement unless it subsequently has been closed. 

A file can be closed by replacing it with an asterisk (*) in a FILE statement, as in lines 125, 
150, and 155. When Lines 100 through 155 have been executed, the FILES reference statement 
has become, in effect. 



100 mjm *;*;*;DFILE 



When line 160 has been executed, the FILES reference statement has become 



l/^'^^^^^^^^mMMgJS^MSS^y mentioned in the discussion of the FILES reference statement, 
refers to simultaneous access. The utilization of the FILE statement for closing files permits 
access to more than eight files by a given program. When you have completed processing a 
given file, simply close it and open another. 



File Modes 

All sequential files to be processed by BASIC are considered as being in either the read mode or 
the write mode. A file in the read mode cannot be written. A file in the write mode cannot be 
read. Initially, the FILES statement results in all files being set to read mode. Before you can 
write to a sequential file, you must place it in the write mode by using a SCRATCH statement. 
To change a file from write mode to read mode, use a RESTORE statement. 
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Reading Data 
File READ 

Valid forms of the file read statement are 

For ASCn files For binary files 

READ #file designator, input list READ :file designator , input list 

READ #file designator : input list READ :file designator : input list 

where the file designator is as previously described. 

The input list consists of the variables, separated by commas, into which the data is to be read. 
The list may contain nonstring and string variables, and any of them may be subscripted. 

CAUTION: An IF END or IF MORE statement should be used to check for an end-of-file 
condition when reading from an external file. 

The following example shows the reading of three ASCII files, RFILE, RDATA, and STRING, by 
the program READ. 



Example: 



IBIlMKilltlliB^II^W^MIIM 

• FILE mmM^-BFILE 

iiiiiiiiiiiiiiWiiiii^^^^ 






lilll^ttiM^HiBlilHilBiHsBiBliSi^Biiliiiiiiiil^ 
Hilf|lfiiiiiiM^ftiMliiiS®iBiiliiillSlMiilii^ 
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Emm FILE yAME-<- READ 

READY 

UST 



READ 

100 FILES HFILEjRDATAjS'rRmG 
110 Fj&R I»l to 7 
120 READ #1,A{D,8{I) 
130 PRINT A(t), 'B(D 
140 HEXT I 

imwmm 
immmr 

170 HEAD #2, % U, V, X, Y, Z 

180 PRINT T;V;V;X;Y;Z 

190 PRINT 

200 PRINT 

210 FOR X=l TO 9 

220R1AD#3,C$CX) 

230 PRIOT C${K:) 

240 NEXT X 

S99 END 

RUN 



READ 



1 


1,5 


2 


2.5 


3 


3.5 


4 


4.5 


5 


S.5 


6 


6.5 


7 


7.5 


12 3 


4 5 6 


ABC 




DEF 




GHI 




3KL 
MH0 




P^ 




STU 




WX 




YZ 





For each execution of the READ statement, one value is read into the variable specified in the 
input list. If the entire file has not been read, the data pointer will remain positioned following 
the last read data item until additional statements designating that file are executed. For in- 
stance, in the previous example, if in the program READ you added a statement 



R, S, and T would have the respective values, 7, 8, and 9 assigned to them from the file RDATA. 
Then the data pointer in RDATA would be positioned at 10, the next data item in the file. The 
line number is not part of the data read by a READ statement. 



Reading with INPUT Statement 

An alternative method for reading data from an ASCII data file is provided by the INPUT state- 
ment. Valid forms of the statement are 

INPUT # file designator , input list or INPUT # file designator : input list 

where the file designator and input list are as previously described. 

When the input list is satisfied, the data pointer is moved to the beginning of the next line 
(record) — before the line number. 

Suppose that four data items are required of the input list by the INPUT statement, and that five 
data items are on the line from which the data will be read. The four data items will be read 
from that line, and the data pointer will be moved to the beginning of the next line. The fifth 
data item will be ignored by subsequent INPUT or READ statements. 

If six data items are required by the INPUT statement and only five items are on the line from 
which the data will be read, the next line will be accessed for the sixth data item. The pointer 
will then be moved to the beginning of the following line. 

If READ and INPUT statements are intermixed, extreme care must be exercised with the location 
of the data pointer. The READ statement moves the data pointer to the next data item regard- 
less of whether it is on the current line or the next line. That is, the READ statement is data 
item oriented and ignores line numbers if they are present. A READ statement, issued sub- 
sequent to an INPUT statement, reads data from the beginning of the line which succeeds the 
line accessed by the previous INPUT statement. An INPUT statement, issued subsequent to a 
READ statement reads data, including a line number if present, from the beginning of the line 
which succeeds the line accessed by the previous READ statement. 

The INPUT statement, unlike the READ statement, does not ignore the line numbers of a file. 
It treats the line numbers as items of data and in record ORIENTED (i. e, line oriented). 

CAUTION: An IF END or IF MORE statement should be used to check for the end-of-file 
condition. 



Example 

If file B contains 



JO 1,2,3,4,5 



then the program 



10 Fiyss B 

20 IN3FUT#1,A,B,C,D,E 
30 PRINT A;B;C;D;E 
99 END 



65 



will produce output of the form 





101 a 


3 4 5 




















This happens because the line number is treated as part of the first data item, 
contained 


If file B 


iO 1 2 


3 4 


















then the output would be of the form 




101234 






















with the line number being assigned to the variable name A. Thus, when using the INPUT state- 
ment, you must include a delimiter immediately following each number in the file; otherwise, 
the line number will be taken as part of the first data item on the line, with any embedded spaces 
ignored. To avoide such an error, INPUT statements should be used primarily with files that 
were written by the PRINT statement. 

When using the INPUT statement to read data from a file with no line numbers or delimiters 
(see Writing with PRINT Statement), you must specify a blank as a delimiter so that the file 
will be read correctly. 



Example : 

If file B contains 











IH 




then the program 














Hi 




will produce output of the form 


1 2 S 4 S 
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Reading Internal Data 



Zero will be accepted as a file designator in the READ statement. A READ statement with zero 
as a file designator refers to data contained inside the program in a DATA statement. 



Example : 
The program 







will produce the following output: 







There is an important difference between using a READ statement to read from a DATA state- 
ment and using a READ statement to read from an external data file. When reading internally 
from a DATA statement, string and nonstring variables in the input list need not have the 
same order as string and nonstring variables in the DATA statement. 



Example: 







or 


10 BlAB It, A, B» C, Of, HI 
, 20BAfA i,ABC,2,l>EF,3 





In both cases in the example, the data items will be read correctly, with A, B, and C having 
values of 1, 2, and 3, and G$ and H$ having values of ABC and DEF. 

However, when reading from an external data file, there must be a one-to-one correspondence 
between string and nonstring items in the file and in the input list. Otherwise the run will be 
aborted, and an INCORRECT FORMAT error message will be transmitted to your terminal. 
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Example 



mx 08:21 

10 1,ABC,2,I>EF,3 

READY 

mmm. file name- re admix 

READY 

10 FILES MIX 

20I^AD#1,A,G$,B>H$,C 

SO vmm A;G$;B;H$;C 

99 BSD 

RON 



RIADMIX 08:20 
lABC 2 DEF 3 



The file MIX is correctly read. But if you change Line 20 to put all the nonstring variables 
in the input list (A, B, and C) before the string variables (G$ and H$), the file cannot be read. 



Example: 



10 itLEs wm 

20 REAd #1, A, B, C, G$, »$ 
30 ^OTT A|Gf;BjH$jC 
m ESD 








HON 






EEADMX: 08:22 








mC^RECT F0IIMAT IN FH 


.EMIX 
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READ FORWARD Statement 



The READ FORWARD statement allows you to search for the next number only, or the next 
string only, when reading a binary file. Valid forms of the statement are 

READ FORWARD: file designator , input list or READ FORWARD: file designator : input list 

where the file designator is as previously described, and the input list consists of numeric vari- 
ables, string variables, or numeric and string variables intermixed. When searching for a 
numeric variable with READ FORWARD, all empty words and words containing string data are 
skipped, and the next number in the file is read. When searching for a string variable with 
READ FORWARD, all empty words and words containing numeric data are skipped, and the 
next string in the file is read. 

Writing Data 
File WRITE 

The form of the file write statement is 

For ASCII files For binary files 

WRITE #file designator , output list WRITE: file designator , output list 

WRITE #file designator : output list WRITE: file designator : output list 

where the file designator is as previously described. 

The output list consists of variables, constants, or literals separated by commas or semicolons, 
which are to be placed in the file. The variables may be either numeric or string, and may be 
subscripted. WRITE #0 refers to the terminal. 

Example: 





WRITE #i, Bl, 4. 5*(C/D), "STRINGl", GS${8) 



















The WRITE # statement generates one line of output unless the margin limit is exceeded or the 
last output list item is followed by a comma or a semicolon. When the line limit is exceeded, 
writing will continue on the next line with the next item of data. When the last item in the output 
list is followed by a comma or a semicolon, subsequent writing occurs on the same line if space 
is available. This arrangement permits listing the file on the terminal. 

The WRITE # statement generates a file beginning with Line 100, and increments by 10 for each 
additional line. The standard field delimiter, the comma, is used. 

The format conventions of the regular PRINT statement apply to the WRITE # statement. The 
comma and semicolon, used to separate data items in the output list, cause the data to be 
written in regular or close-packed format. The TAB function can be used. But in coimting for 
tabbing, the line number is not included. 

Example: 

The program, using the files DATA and STRING, produced the following output. 



Files 

^^^^ ;^i8:St . 



Program 



. A. B. a E. F. G 

so HMD T$,TI$,T$,W$,X$, Y$,Z$ 



Output 



iOO I , 


^^^^^ 








110 6 , 










120 1 , 2 , 


3 , 4 , S , < 








ISO ABC, 


JLIJBjeJ? 









Example using TAB: 

10 HLES Z 
20EKAB#1,A,B,C 

30 PBIOT TAB(2)iA;TAB(15);B;TAB(30);C 

mms> 

ZEEAD 15:11 



A zero file designator used with a WRITE* statement will be accepted and cause the file to be 
written to the terminal. In this case no SCRATCH statement is required, and no line nxunbers 
are supplied. 
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Example: 



lOHLESDATA 










IS* f*** 




80 WRITE! 
















mm 

2ER0DES 






1 > 2 1 3 


,4,5 


iliillilHIBHil^ 



Writing with PRINT Statement 

An ASCII file may be written without line numbers or delimiters by using the PRINT statement. 
Valid forms of the statement are 

PRINT #file designator , output list or PRINT #file designator : output list 

where the file designator and output list are as previously described. 

The PRINT statement has the same result as the WRITE statement, except that no line numbers 
or delimiters are written 

Example: 

With the file RDATA, the program FILEl produces the output shown below: 
File 









V'VX;- ; •" 


-406 li2'i$,-4,5,,6,7 




iiliii^ill^i^iliiijiiil^i^^^^ 
liil^jiiiliiliiiiiiiiM 




Program 










y 2KJREA1>#1>A,B,C^P,E>F5G 

^^^^ ^:^99EK0^ - 


iiiPiiii^i^iillliiiiii^iiiii^^ 






Output 




M^^iiii^iiiiiiiiiiiip;!^^ 















The statement PRINT #0 in Line 30 directs the system to print the results at your terminal. '/ 
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In general, you cannot write to a file to which you have been printing, but you can print to a file 
to which you have been writing. 

Matrix Input/Output Statements 

MAT READ Statement 

Data in matrix form may be read from a file with the MAT READ statement. Valid forms of 
the statement are 

For ASCII files For binary files 

MAT READ #file designator , input list MAT READ: file designator , input list 

MAT READ #file designator : input list MAT READ: file designator : input list 

where the file designator is as previously described and the input list contains matrix names. 

The MAT READ statement reads from the designated file the matrices specified in the list. 
Matrices in the list should have their dimensions specified, either in a DIM statement or in the 
MAT READ statement itself. When no dimensions are specified, a 10 by 10 matrix is assumed. 

The dimensions of a matix may be specified using the DIM statement or the MAT READ state- 
ment. If no dimensions are specified, the system will assume a 10X10 matrix. 

Example: (Dimensions not specified) 

• mwmm MATA 
2O:matria0#1/x,y 
30 mat print x; 

m MAT mim t; 



Since no dimensions are specified for X and Y, each is assumed to be a 10x10 matrix. If there 
are not enough data items in file MATA to complete a 10x10 matrix, matrix X will be filled out 
with zeros. The second matrix specified, Y, will then also be filled with zeroes. If MATA 
contains 

1,2,3,4,5,6,7,8,9 

then the above program will read X as and will read Y as 



1 


2 


3 


4 


5 


6 


7 


8 


9 
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Example : (Dimensions specified in a MAT READ Statement) 



10 MLES MATA 

20 MAT READ #i,X{3,3) 

30 MAT PRINT X; 







I 2 


3 




6 


7 8 


9 



Data is read from the file in row-wise sequence. A zero file designator causes the data to be ^ 
read from a DATA statement in the program. 



Example: 


10 FILES MATA 




20DIMC(3,3),D(5.7) 




30MATREAD#1,G,B 




99 Em 





Line 30 causes the reading of matrices C and D, dimensioned by line 20 as 3x3 and 5x7, from 
file MATA. Since data is read row-wise, if MATA contains the integers 



1,2,3,4, ,40,41,42,43,44 

then matrices C and D will contain 



1 


2 


3 


10 


11 


12 


13 


14 


15 


16 


4 


5 


6 


17 


18 


19 


20 


21 


22 


23 


7 


8 


9 


24 


25 


26 


27 


28 


29 


30 








31 


32 


33 


34 


35 


36 


37 








38 


39 


40 


41 


42 


43 


44 



MAT WRITE Statement 

Data in matrix form may be written to a file with the MAT WRITE statement. Valid forms of 
the statement are 

For ASCII files For binary files 

MAT WRITE #file designator , output list MAT WRITE: file designator , output list 

MAT WRITE #file designator : output list MAT WRITE: file designator : output list 

where the file designator is as previously described, and the output list contains matrix names. 

The MAT WRITE statement writes the matrices specified in the output list to the designated 
file. You cannot specify the dimensions of the matrices in the MAT WRITE statement. 

Data is written to the file in row-wise sequence, and may be either packed or unpacked. A zero 
file designator causes the data to be printed out by the terminal for ASCII files only. 
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In the following example, matrices X, Y, and Z are read from file A, and then written in matrix 
form to files B and C. Matrices Y and Z are tightly packed, as specified by the semicolons fol- 
lowing their names in the output list. 

Example: 



iiiiiiiifci 
ililiPiillii 



REST0RE Statement 

The RESTORE statement causes the data pointer for the designated file to be repositioned at 
the beginning of the file. The form of the statement is 



For ASCII files 
REST0RE #file designator 
where the file designator is as previously described. 



For binary files 
REST0RE: file designator 



In addition to repositioning the data pointer, the RESTORE statement resets a sequential file 
to the read mode. This makes it possible to read a file that has been previously written by the 
same program, or to read the file more than once during a program run. The only action taken 
on a random binary file is the repositioning of the data pointer. 

In the following example. Line 40 will read the same values from the file DATA that were read 
by Line 20. Line 30 sets file B to the read mode and the data pointer at the beginning of the 
file. 

Caution: If the last access to the designated file, prior to execution of the REST0RE state- 
ment, was with a READ statement, an INPUT statement, issued subsequent to the REST0RE 
statement, will begin reading data from the second line of the file. 

Example: 
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SCRATCH Statement 



Sequential files specified in a program are initially opened in the read mode. Before you can 
write to a sequential file, it must be placed in the write mode. This can be done with the 
SCRATCH statement. Valid forms of the statement are 



For ASCII files por binary files 

SCRATCH # file designator SCRATCH: file designator 

where the file designator is as previously described. When a file is scratched, all data elements 
contained in the file are erased. 



If SCRATCH is used with a random binary file, the data pointer is positioned at the beginning of 
the file, and all data elements are replaced with binary zeros. 

DELIMIT Statement 



The standard file delimiter used to separate items when reading from or writing to an ASCII file 
is the comma. Sometimes it may be useful to have a nonstandard file delimiter. The DELIMIT 
statement allows you to specify such a nonstandard delimiter. Valid forms of the statement are 



DELIMIT #file designator , (character) 

DELIMIT #file designator : ( character ) 

DELIMIT #file designator , ( abbreviation ) 

DELIMIT #file designator : ( abbreviation ) 

where the file designator is as previously described, and the character is the nonstandard de- 
limiter to be used. For nonprinting characters such as line feeds, the abbreviations used in the 
USA Standard Code for Information Interchange are employed: LF for line feed, CR for carriage 
return, and so on. Whenever a file with a nonstandard delimiter is to be read or written, the 
nonstandard delimiter must be specified in a DELIMIT statement before the READ or WRITE 
statement. The PRINT statement, however, will write the specified file with no delimiters or 
line numbers, regardless of whether a nonstandard delimiter or the comma is used. 

( ) 

Caution: Use of the ASCII characters for carriage return (CR) and null (NUL) is not 
recommended. 



Any FILE statement causes the delimiter for the named files to be once again the standard 
comma(,). If, following a FILE statement that names a file, you want to continue using a 
nonstandard delimiter with that file, you must so specify in a new DELIMIT statement. 

Example: 
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4W 

. , -;mtWL-W3J& NAME— IL 

■ LIST . 

^^^^^■llllllllilll 



Example : 

10 1&2&3&4&5&6&7 

IKTIR HLE NAME —DEjL TEST 

20 DEI/IMIT #!,(&) 
80READ#1,A,B,C,D,E,F 
40 PMNT A;B;CpOjE;F 

In the above example, Line 20 is required to specify the nonstandard delimiter used in the file 
DEL. If it were not present, an INCORRECT FORMAT message would be printed out upon the 
attempt to execute the READ statement in Line 30. 



A zero file designator will be accepted and interpreted to refer to your terminal. 
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Example: 



■ mw 




NEW FILE m 




READY 





10 HMSSBEI. 

30 DELIMIT fO>(&) 
40 WRITE #0, 

mu 



APPEND Statement 

Data may be added tlo sequential files with the APPEND statement. Valid forms of the statement 
are 



For 
APPEND #file 
where the file 



ASC^II files 
designator 



The APPEND 
last item of data in 
call and write to 



desigi|iator is as previously described 

statenkent 
in th 
files 



MARGIN Statement 



The MARGIN 
ASCII file. Valid 



statement 
fo;:*ms 



MARGIN #file 



where the file 
mine the value at 



The integer part of 
size cannot exceed 
of zero will result in 
minal, if the value i 



IS 



A;B;C;D;E;F;G 
16:20 



For binary sequential files 
APPEND: file designator 



causes the data pointer for the designated file to be located after the 
the file, and sets the file to the write mode. Use of APPEND allows you to 
- without losing data previously saved in that file. 



enables you to specify the rightmost character position for a designated 
of the statement are 



designator , expression or MARGIN #file designator : expression 



desigr ator is as previously described, and the expression is evaluated to deter- 
whlch the right margin is to be set. 



tie 
1L8 



expression's value is taken. For files other than the terminal, the margin 
. If a greater value is used, a margin of 118 will be set. A margin size 
a margin of 118 being set for files other than the terminal. For the ter- 
the margin is assumed to be infinite. 



The following program will write file A with the right margin set at character position 25. 



77 



Example: 



10 FIJUES A 
26 SCRATCH #1 
80MAHQM#1,25 
40 F0RX« 1 T0 60 
m WRITE #1,X; 
60NEXTX 



If Line 30 in the above example were 



then the value of the expression C*D would determine the right margin for file A. The integer 
part of the value is taken. K in the example the value of C*D is 28. 365, the margin in file A will 
be set to 28. 

If you are using a wide-carriage terminal (greater than 75 characters per line), you must use the 
MARGIN statement prior to any attempt at printing lines of more than 75 characters. The form 
of the statement is 

line number MARGIN #file designator , expression 
IF END Statement 

The IF END statement allows you to test, when reading a sequential file, for the end of data, or 
when writing a sequential file, for the end of space. Valid forms of this statement are 

For ASCII files For binary files 

IF END #file designator THEN line IF END: file designator THEN line 

number number 

IF END #file designator , THEN line IF END: file designator , THEN line 

number number 

IF END #file designator :THEN line IF ENDi file designator :THEN line 

number number 

When reading a file, the IF END statement tests the designated file to determine whether a valid 
data item was read. If not, the indicated path is taken. When writing a file, the IF END state- 
ment tests the designated file for the end of file space. If the end of file space is detected, the 
indicated path is taken. 



Example: 



If file B contains 



then the program 
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will produce the output 



1 12 8 4 S 6 7 NUMBER 0M1 

















In the above example, after the eighth time the READ statement in Line 20 is executed, the IF END 
statement finds that no valid data remains in file B, and the indicated path to Line 60 is taken. 

Example : 

If file B contains 

then the program 
will produce the output 



In this example, the first READ in Line 20 assigns the values of 1, 2, and 3 to the variables 
A, B, and C. The IF END statement then finds that there is more data in the file, and Line 50 
is executed. The second READ in Line 20 assigns the last two items in the file, 4 and 5, to the 
variables A and B, and assigns the value to C. The IF END test then finds that there is no 
more data in the file, and the indicated path to Line 60 is taken. 

When writing to a file, you use the IF END statement to test for the end of file space. If the end 
of file space is detected, the indicated path is taken. 

Example : 

The program 
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will repeatedly write the value of X to file D until the end of file space is detected by the IF END 
statement in Line 60. The the path to Line 80 will be taken, and IF END TEST INDICATES END 
0F FILE will be printed out. 



IF M0RE Statement 



The IF M0RE statement allows you to test, when reading a sequential file, for more data, or 
when writing a sequential file, for more space. Valid forms of the statement are 

For ASCII files For binary files 

IF M0RE #file designator THEN number IF M0RE: file designator THEN line 

number number 



IF M0RE #file designator , THEN line 
number 

IF M0RE #file designator :THEN line 
number 



IF M0RE: file designator , THEN line 
number 

IF MC(RE :file designator :THEN line 
number 



When reading the designated file, the IF MORE statement tests whether there is any more data 
in the file and acts on the result of the test. When writing the designated file, the IF MORE 
statement tests whether there is any more file space and acts on the result of the test. 

Example: 



If file Y contains 



then the program 

WILMS YiB ^ 

9§ IHD 



will give the output 
80 



1 2 Z 










4 5 6 




M0BE DATA US #1 


7 











In the preceding example, the last data item in the file 7 was read on the third execution of Line 
20. Then the variables B and C were assigned values of zero, because there was no more data 
after 7. The IF M0RE statement then found no more data in the file and caused RAN 0UT to be 
printed out. If Lines 20 and 30 in the above examples were 





20 READ 
30 PRINT A 


k 

































then the program would have produced the output 





M0RlDATAnr#l 




W0m DAT Am «1 




■IllilllBIia^BIIIIMMi 




M0REI>ATAM« 




^^^^^^^^^^^^^^^ 




M0RE DATA IN #1 




M0REDATAIH#1 




M0R1»ATAIM#1 








BAB?0UT 





When writing to a file, the IF M0RE statement can be used to test whether there is room to write 
more to the file, and to act upon the result of the test. 

Example : 

The program 



10 FILES B, 




20 SCRATCH #1 




80I,ETX«1 




40 LET X X+1 




m WHETE #1,X 




60 IF W0BM #1 THEN 40 




70 PRIHT M0EE R00M" 





will print, after file B is completely filled, 
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The program writes X to file B as long as the IF M0RE statement in Line 60 finds that more 
space remains in the file. When the file is full, the IF M0RE detects the end of space and 
causes N0 M0RE R00M to be printed out. 



BACKSPACE Statement 



The BACKSPACE statement, when used while in the read mode, causes the data pointer to be 
stepped backward over one delimiter (and line number if present) to the previous data item. 
When used while in the input mode, the BACKSPACE statement causes the data pointer to be 
stepped backward to the beginning of the current line. Files being printed or written cannot be 
backspaced and then written to, because backspacing places the file in the read mode. The form 
of the statement is 



BACKSPACE #1 file designator 

You can use this statement to backspace to a particular data item or to the beginning of a file. 
It may be used with ASCII files only. 

Example: 



If the file DATA contains 



10 1,2,8,4,5,6,7,8 

20 #,10,11,12,18,14,15,16 

then in the program 



'4oi^iiy5#,i,E,f,GvH , ■ - ,; , ; \ -../.r 

Line 20 will read the values 1, 2, 3, and 4 into variables A, B, C, and D, and the data pointer 
will be advanced to the next item, 5. Line 30 will then backspace the data pointer to the pre- 
vious item, the number 4. Line 40 will then assign values of 4, 5, 6, and 7 to variables E, F, 
G, andH. 

It is possible to backspace past the beginning of a file. When this happens, the first line in the 
file is used again and again. 

Example : 
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In the preceding example, after Line 20 the data pointer is positioned to indicate 16, the next 
item in the file. The loop in lines 30 to 50 backspaces 16 times, moving the data pointer past 
the beginning of the file. This causes the data pointer to begin backspacing from the end of the 
first line of data. In this case, the pointer will indicate 8, and line 60 assigns the values 8, 9, 
and 10 to R, S, and T. If the backspace loop had been greater, the first line of data in the file 
would have been repeatedly backspaced over, and the data pointer would have been positioned at 
some item in the first line. 

The following example illustrates backspacing of a file in the input mode. 
Example : 



iO IILIS DAm 

30 BACKSPACE #1 

SO PKINT ^TmST SKT VALUES^' 
60 FRIOT A;B,C;B;E;F;0;H 
?0 3PBINT* 

80 FRIOT ^*SSC0HD SET 0F YAhVEB' 
90 wmm I>rjK^L;M;M;0;P 
EM) 

FIBST SET <2(f YAL0KS 
101 2 3 4 § # ? 8 

Sm0iD SET 0F VALUES 
101 2 3 4 5 e 7 8 



Note that in the above example the line number is included in the first data item. 



BACKSPACE$ Statement 

The BACKS PACE$ statement is available for use with binary sequential and binary random files 
containing string data. The form of the statement is 

BACKSPACE$ : file designator 

where the file designator is as previously described. 

THE BACKSPACE$ statement backspaces the data pointer to the last string control word and 
sets the file to the read mode. K no string control words are found, the data pointer is posi- 
tioned at the beginning of the file. 
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SETW Statement 



The SETW statement, in binary random access files, enables you to move the data pointer to 
any position in the file. The form of the statement is 

SETW expression for the file designator T0 expression 

SETW moves the data pointer in the designated file to the word number specified by the value of 
the expression. 



LCW Function 

The LCW function, in binary random access files, returns a number representing the current 
word location of the data pointer. The form of the function in a statement is 

LET X = LCW (expression for the file designator) 



LFW Function 

The LFW function, in binary random access files, returns a number representing the current 
size of the file in words. The form of the -function in a statement is 

LET X = LFW ( expression for the file designator ) 



SUMMARY 

External files may be ASCII sequential, binary sequential, or binary random. The various file 
manipulation statements described in this section are NOT all available for each of the three 
classes. The following table indicates the availability of each file manipulation statement for 
the three classes of files. 



ALL THREE 
CLASSES 


ASCn SEQUENTIAL 
ONLY 


ASCn SEQUENTIAL 
BINARY SEQUENTIAL 


MAT READ 

FILES 

FILE 

SCRATCH 
RESTORE 
IF END 
IF MQ(RE 
MAT WRITE 


DELIMIT 

MARGIN 

BACKSPACE 


APPEND 



BINARY SEQUENTIAL 
BINARY RANDOM 


BINARY RANDOM 
ONLY 


BACKSPACE$ 
READ F0RWARD 


SETW 

LFW 

LCW 
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Appendix A. ERROR MESSAGES 



Because most programs contain errors, a series of diagnostic messages is included in BASIC. 
Some of these messages occur during compilation and others during execution of a program. 
Many of the messages not only identify the type of error, but indicate the line number where the 
error occurred or, if the line number where the error occurred cannot be determined, the 
number of the previous line. We expect that as the development of the BASIC language continues 
these error messages will be revised. 

During execution, certain messages occur which do not stop execution, but inform you of irreg- 
ular conditions existing in identified lines of your program. Other messages, however, point 
out serious errors which stop execution. 



Compilation Errors 


MESSAGE 


MEANING 


CUT PR0GRAM 0RDIMS 


Either the program is too long, or the 
amount of space reserved by the DIM state- 
ments is too large, or a comination of 
these exists. This message can be elim- 
inated by cutting the length of the program , 
reducing the size of the lists and tables, 
reducing the length of printed labels, or 
reducing the number of simple variables. 


DIMENSI0N T00 LARGE AT (LINE #) 


The size of a list or table is too large for 
the available storage at the line indicated. 


END IS N0T LAST 


Self-explanatory; it also occurs if there are 
two or more END statements in the t)ro- 
gram. 


EXPRESSI0N T00C0MPLICATED IN (LINE #) 


Too many operations have been attempted 
in a single expression. Probably too many 
parentheses have been used. Use two or 
more simpler expressions instead. 


FOR'S NESTED T00 DEEPLY AT (LINE #) 


Corresponding NEXT statement for pre- 
ceding F0R statement must occur before 
another F0R statement can be used. 


F0R WITH0UT NEXT IN (LINE #) 


A NEXT statement is missing. 


ILLEGAL CHARACTER IN (LINE #) 


Use a valid character in place of an illegal 
character. 


ILLEGAL C0NSTANT IN (LINE #) 


More than nine digits or incorrect form in 
a constant number, or a number out of 
bounds (>1.70141E38). 


ILLEGAL F0RMULA IN (LINE #) 


This may indicate missing parentheses, 
illegal variable names, missing multiply 
signs, illegal numbers, or many other 
errors. 
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MESSAGE 



MEANING 



ILLEGAL INSTRUCTI0N IN (LINE #) 
ILLEGAL LINE NUMBER AFTER (LINE #) 
ILLEGAL LINE REFERENCE IN (LINE #) 

ILLEGAL MAT FUNCTI0N IN (LINE #) 

ILLEGAL MAT MULTIPLY IN (LINE #) 

ILLEGAL MAT TRANSP0SE IN (LINE #) 

ILLEGAL VARIABLE IN (LINE #) 

INC0RRECT F0RMAT IN (LINE #) 

INC0RRECT NUMBER 0F ARGUMENTS IN 
(LINE #) 

INC0RRECT NUMBER 0F SUBSCRIPTS IN 
(LINE #) 

MISMATCHED STRING 0PERATI0N IN (LINE #) 

NESTED DEF IN (LINE #) 

NEXT WITH0UT F0R IN (LINE #) 

N0 END INSTRUCTION 
SYSTEM ERR0R IN (LINE #) 

T00 MANY C0NSTANTS AT (LINE #) 

T00 MANY FILES AT (LINE #) 



Other than one of the legal BASIC instruc- 
tions has been used in the line indicated. 

Line number is of incorrect form, or con- 
tains more than five digits. 

There is some character other than a num- 
ber in a transfer statement (such as a G0 
T0) where the line number should be. 

A matrix function which is not possible has 
been attempted. 

A matrix has not been multiplied correctly. 
MAT A = A*B is illegal. 

A matrix has not been transposed correctly. 
MAT A = TRN(A) is illegal. 

An illegal variable name has been used. 

The format of an instruction is wrong. 

The number of arguments when defined 
must equal the number of arguments when 
referenced. 

Indicates a matrix with one subscript or a 
vector with two. 

You have attempted to combine two strings 
algebraically, to compare a string and a 
number, or to assign a number to a string 
variable or vice versa. 

Multiple-line DEF's cannot be nested. 

A NEXT statement has been used without 
an accompanying F0R statement. 

The program has no END statement. 

No user remedy is possible; please report 
to your G. E. Time-Sharing Representative. 

There are too many constants. Put some 
in as DATA. 

More than 8 files are specified in a FILES 
statement. 
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MESSAGE 


MEANING 


♦UNDEFINED LINE NUMBER (LINE #) IN 
(LINE #) 


The line number appearing in a G0T0 or 
IF-THEN statement does not appear as a 
line number in the program. 


♦UNDEFINED FUNCTION FN (LETTER) IN 
(LINE #) 


A function such as FNF ( ) has been used 
without appearing in a DEF statement. 
Check for typographical errors. 


UNFINISHED DEF 


A multiple -line DEF has not been ended 
with FNEND. 


Execution Errors 




MESSAGE 


MEANING 


ABS0LUTE VALUE RAISED T0 P0WER IN 
(LINE #) 


A computation of the form (-3) f 2. 7 has 
been attempted. The system supplies (ABS 
(-3)) t 2. 7 and continues. 
NOTE: (-3) f 3 is correctly computed to 
give -27. 


CANN0T CHANGE SIZE 0F MULTIPLE 
APPFSS FIT.E (FIL ENAMEL IN fLINE 


You have appended or written to a file that 
was named at least twice in the FILES 
statement, or otherwise referenced more 
than once Execution continues You can 
expect difficulties later. 


CANNOT WRITE, READ ONLY FILE 
(FILENAME) IN (LINE #) 


You have attempted to write to a file which 
only read access has been permitted. 




VrMi hcitrA i*T»i(oH QonoQG Q filck i'hai" Hoocn^i* 

exist. 


PAN'T WPTTT? TTTT.F ^FTT.F. NAMF.^ TN ^T.TNF. ^\ 


Oiit nf snapp 


CHANGE ERR0R IN (LINE #) 


In converting numerical code characters 
into string characters, using the CHANGE 
statement, you have probably made an 
error in the character count. Check the 
zero element of the string. 


DATA REC0RD T00 LARGE IN (FILENAME) 
IN (LINE #) 


While reading a file, a line 120 or more 
characters long has been encoimtered. 


DIMENSI0N ERR0R IN (LINE #) 


A dimension inconsistency has occured in 
connection with a MAT statement in the 
indicated line. Execution stops. 



♦These errors are not detected tintil run-time initialization. 
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MESSAGE 



MEANING 



DIVISION BY ZER0 IN (LINE #) 
EXP T00 LARGE IN (LINE #) 

FILE N0T SAVED (FILENAME) IN (LINE #) 

ILLEGAL FILE C0MMAND F0R (FILE NAME) 
IN (LINE #) 

ILLEGAL FILE NAME 0R PASSW0RD IN 
(LINE #) 

ILLEGAL 'VAV ARGUMENT IN (LINE #) 

INC0RRECT F0RMAT IN FILE (FILE NAME) 
LINE #) 

INC0RRECT F0RMAT— RETYPE IT 
INVALID FILE NUMBER IN (LINE #) 

L0G 0F NEGATIVE NUMBER IN (LINE #) 

L0G 0F ZER0 IN (LINE #) 

N0T EN0UGH INPUT —ADD M0RE 

ON EVALUATED 0UT 0F RANGE IN (LINE #) 



A division by zero has been attempted. 
The system assumes the answer is + cp 
(about 1. 70141E38) and continues running 
the program . 

The argument of an exponential function is 
> = 88. 029. + 00 (1. 70141E38) is supplied for 
the value of the exponential and the running 
is continued. 

The specified line number references a file 
that has not been saved under your user 
number. 

You have tried to write to a file that has not 
been set to the write mode, or read from a 
file that has not been set to the read mode. 

File name or password violates rules for 
naming. 

You have used something other than a 
numeric argument in a VAL function. 

You have tried to read a string with a nu- 
meric variable. 

Correct the input data. 

File number is less than or greater than 
8, or otherwise outside the range of 
acceptable file numbers, or the referenced 
file is not open. 

The program has attempted to calculate the 
logarithm of a negative number. The 
system supplies the logarithm of the 
absolute value and continues. 

The program has attempted to calculate 
the logarithm of 0. The system supplies 
- » (about -1. 70141E38) and continues 
running the program . 

S elf - explanato r y . 

The integer part of the variable in the 0N- 
G0T0 statement is less than 1 or greater 
than the number of line numbers supplied 
by the statement. 
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MESSAGE 



MEANING 



0UT 0F DATA IN (LINE #) 



0UT 0F R00M AT (LINE #) 
0VERFLOW IN (LINE #) 

PR0GRAM HALTED 

READ WAS N0T GRANTED TO FILE (FILE- 
NAME) IN (LINE #) 

RETURN BEF0RE G0SUB IN (LINE #) 

RUN 0NLY FILE - (FILENAME) IN (LINE #) 

SQUARE R00T 0F NEGATIVE NUMBER IN 
(LINE #) 

SUBSCRIPT ERR0R IN (LINE #) 

SYSTEM ERR0R IN (LINE #) 

T00 MUCH INPUT— EXCESS IGNORED 



A READ statement for which there is no re- 
maining data in a DATA statement has been 
encountered. This may mean a normal end 
of your program. Otherwise, it means you 
haven^t supplied enough data. Execution 
stops. This comment will not appear when 
reading data from a file. 

The space reserved was not large enough. 
Try a dummy DIM statement, such as DIM 
A$ (1000). 

A number larger than about 1. 70141E38 has 
been generated. The system supplies + 
(or -) 00 (about ± 1. 70141E38) and continues 
running the program . 

S or ST0P was typed when a numeric input 
was requested. 

You have attempted to open a file to which 
read access was not permitted. 

This occurs if a RETURN is encountered 
before a G0SUB. (The G0SUB does not 
require a lower statement number, but 
must be performed before a RETURN. ) 
Execution stops. 

The specified line number references an 
external data file that is run only (has a $ 
in the 6th character position of the file 
name). 

The program has attempted to extract the 
square root of a negative number. The 
system supplies the square root of the 
absolute value and continues running the 
program . 

A subscript has been called for that lies 
outside the range specified in the DIM 
statement, or if no DIM statement applies, 
outside the range through 10. Execution 
stops. 

No user remedy is possible; please report 
to your G. E. Time-Sharing Representative. 

Self-explanatory. 
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MESSAGE 



MEANING 



UNDERFL0W IN (LINE #) 



USELESS L00P IN (LINE #) 

ZER0 T0 NEGATIVE P0WER IN (LINE #) 



A number in absolute size smaller than 
about 1. 46937E-39 has been generated. 
The system supplies and continues nmning 
the program. In many circumstances 
underflow is permissible and may be 
ignored. 

Execution stops. Check the line indicated. 

A computation of the form | (-1) has been 
attempted. The system supplies + « (about 
1. 7014 1E38) and continues running the 
program. 
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APPEND statement 77 

ASC Function 37 
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Arithmetic operations 6 
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BCL function 33 

Binary files 59 

CHAIN statement 45 

CHAIN classification 45 

CHANGE statement 56 

CLK$ function 32 
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DATA statement 17, 57 
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DELIMIT statement 75 

DET function 52 

DIM statement 20, 55 
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Debugging 13 
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LET statement 16, 55 

LET with strings 55 
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RND function 30 

Reading data 63 
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SCRATCH statement 75 

SETW statement 84 

Sign function 29 

SIN(X) 7 
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Step 19 
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String size 55 
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